Oktober 2010Oktober 2010

Sabtu, 09 Oktober 2010

Xperia X10 Sony Ericsson




Pull out your Xperia™ X10 touchscreen phone, press the infinite button and enjoy it all - friends, artists and more. Here and now.

Addicted to friends - Timescape™
Take a personalised tour of Timescape™ using your Facebook™ feed and see all your conversations and updates in one view.

Fun to the core - Mediascape
Wanna quench your thirst for fun? Take a sip of Sony Ericsson Mediascape - all your music, videos and photos, just waiting to be enjoyed

Seen that face before?
The Xperia™ X10 recognises up to five faces in a photo and automatically stores them under your friends in your phone.

Xperia X10 features

Update your Xperia™ X10

- Free backup and restore application for your contacts, messages, bookmarks, settings, etc.
- Improved usability of camera, media player, etc.
- Improved overall phone performance.
- PlayNow™, with premium apps and games available in selected markets.

Timescape™ - meet your mates

Sony Ericsson Timescape™ lets all your communication with a person come together in one place. Facebook™, Twitter™, emails, photos, text messages - all gathered, so you don't have to open loads of different apps to see what's going on.

Mediascape. For serious entertainment

Online or stored in your phone: with Mediascape, all your music, photos and videos are in one place. You access your media from everywhere - PlayNow™, YouTube™, your phone memory.

Want everything from everywhere?

All your comms with your friends via Timescape™, all the artist info you want through Mediascape: just touch the infinite button and have it all. Instantly.

You choose - Android Market™

Going out? Finding out? Or perhaps just chilling out? Download any application you want from Android Market™ and customise your Xperia™ X10 to make it exclusively yours.

Find the way - aGPS

You'll never get lost again. Your phone has built-in aGPS. Location-based services like Google Maps™ and Wisepilot help you find the way to your destination. Or add location info to your images - use the geo-tagging function.

HSPA - serious speed

Turbo 3G gives you broadband-like speed in your phone. Download large files and email attachments in a snap. Get Web sites and news feeds to your screen in seconds.

Transfer your old phonebook to your new phone

By setting up your old phone to sync with Sony Ericsson, you can transfer Contacts, Calendar, Notes and Bookmarks from your old phone to your new one. (It works even if your old phone is of another make.) Sony Ericsson Sync also makes it possible for you to access and manage up-to-date information in your mobile phone from the Internet - anytime, anywhere with Sony Ericsson Sync.

spesification

Size 119.0 x 63.0 x 13.0 mm
4.7 x 2.5 x 0.5 inches
Available colours Sensuous Black
Luster White
Weight 135.0 g
4.8 oz
Memory microSD™ up to 16GB, 8GB included
Phone memory 1GB

* Actual free memory may vary due to phone pre-configuration
Screen 4" capacitive touchscreen

source : sonyericsson.com
Selengkapnya...

Senin, 04 Oktober 2010

encrypt and decrypt with vb




Public Function Encrypt(ByVal Teks As String) As String
Dim Panjang_Teks As Integer
Dim Teks_Baru As String

Karakter = ""
Panjang_Teks = Len(Teks)

For i = 1 To Panjang_Teks
Karakter = Mid(Teks, i, 1)
Select Case Asc(Karakter)
Case 65 To 90 'huruf besar
Karakter = Chr(Asc(Karakter) + 100)
Case 97 To 122 'huruf kecil
Karakter = Chr(Asc(Karakter) + 100)
Case 48 To 57 'angka
Karakter = Chr(Asc(Karakter) + 100)
Case 32 'spaci
Karakter = Chr(32)
End Select
Teks_Baru = Teks_Baru + Karakter
Next
Encrypt = Teks_Baru
End Function


Public Function Decrypt(ByVal Teks As String) As String
Dim Panjang_Teks As Integer
Dim Teks_Baru As String

Karakter = ""
Panjang_Teks = Len(Teks)

For i = 1 To Panjang_Teks
Karakter = Mid(Teks, i, 1)
Select Case Asc(Karakter)
Case 165 To 190
Karakter = Chr(Asc(Karakter) - 100)
Case 197 To 222
Karakter = Chr(Asc(Karakter) - 100)
Case 148 To 157
Karakter = Chr(Asc(Karakter) - 100)
Case 32
Karakter = Chr(32)
End Select
Teks_Baru = Teks_Baru + Karakter
Next
Decrypt = Teks_Baru
End Function

Private Sub Command1_Click()
Text2 = Encrypt(Text1)
End Sub

Private Sub Command2_Click()
Text3 = Decrypt(Text2)
End Sub

check this out for example encrypt decrypt with vb 06
Selengkapnya...

transfer data from access database into excell with vb



Option Explicit
Dim con As ADODB.Connection
Dim rec As ADODB.Recordset
Dim connectString As String
Dim objExcel As Object
Dim objTemp As Object

Public Sub excel(rec As ADODB.Recordset)
Dim indexbaris As Integer
Dim indexcolom As Integer
Dim jmlrecord As Integer
Dim jmlfield As Integer
Dim totalbaris As Variant
Dim excelVersion As Integer

totalbaris = rec.GetRows()

jmlrecord = UBound(totalbaris, 2) + 1
jmlfield = UBound(totalbaris, 1) + 1

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Add

Set objTemp = objExcel
excelVersion = Val(objExcel.Application.Version)
If (excelVersion >= 8) Then
Set objExcel = objExcel.ActiveSheet
End If

indexbaris = 1
indexcolom = 1
For indexcolom = 1 To jmlfield
With objExcel.Cells(indexbaris, indexcolom)
.Value = rec.Fields(indexcolom - 1).Name
With .Font
.Name = "Tahoma"
.Bold = True
.Size = 8
End With
End With
Next

rec.Close
Set rec = Nothing

With objExcel
For indexbaris = 2 To jmlrecord + 1
For indexcolom = 1 To jmlfield
.Cells(indexbaris, indexcolom).Value = totalbaris(indexcolom - 1, indexbaris - 2)
Next
Next
End With

objExcel.Cells(1, 1).CurrentRegion.EntireColumn.AutoFit
End Sub

Private Sub Form_Activate()
Dim SqlString As String

Set con = New ADODB.Connection
Set rec = New ADODB.Recordset

connectString = "Provider=Microsoft.Jet.OLEDB.3.51;" _
& "Data Source=C:\Program Files\Microsoft Visual Studio\VB98\BIBLIO.MDB"

SqlString = "SELECT * FROM Publishers where PubID <= 50" con.Open connectString rec.CursorLocation = adUseClient rec.Open SqlString, con End Sub Private Sub Command1_Click() Call excel(rec) End Sub

Selengkapnya...

Jumat, 01 Oktober 2010

Beware, Stuxnet virus




Still remember the alias Stuxnet Winsta? Viruses that are popular causes disk space becomes full, any remaining hard disk capacity so that you can not save the file. Now, there is a type of virus made in local Stuxnet which will also result in hard drive becomes full, but with different methods.

"To spend the rest of the disk, it will make virus file in number in the hundreds in every folder that was determined," said Taufik Juhar Adang, Senior Vaksinis Vaksincom, in his statement, October 5, 2010. "But 'fortunately' this virus will only attack the master drive [C: \] alone."

To simplify deployment, Adang said, he will utilize the autorun feature of Windows and also spreads by exploiting a USB flash disk media and networks (full access). In addition he will also be spread through peer to peer file sharing like Kazaa, Morpheus or any other program to create several files in the directory specified.

Adang said, in an effort to spread, the virus will use social engineering to take advantage of file compression program (WinRAR) with the characteristics using WinRAR icon, the file size 60KB, and the file extension *. exe.

"The technique used is not just mendompleng WinRAR program icon, but more than that, it will activate itself automatically when the user starts the program WinRAR or files that have been compressed using WinRAR," Adang said.

If the target computer program is not installed WinRAR, Adang said, he was preparing another method for themselves can be activated automatically. "How to do a 'diversion' when the user runs the file with the extension that has been determined."

To complicate the process of elimination, it will block some Windows features such as Search, Folder Options and Run. "He also would block security tools or when the user accesses a folder with a name that has been determined by reading the caption text or the name of the application. If the user opened it, he immediately closed it again, "Adang said. "In addition he will also be blocked when a user installs the program / application to open Notepad application."

Not only that it will be done by this virus, it will also hide files MS Office (MS Word) located in the directory [C: \ Documents and Settings \% username% \ My Documents] and create a replacement file [in the form of the virus file] according to MS Word file name.

To clean this virus with an optimal, Adang said, you need to use anti-virus database up to date. With the latest updates, the antivirus will detect this virus as W32/Suspicious-Gen2.CAHWJ or Backdoor.Trojan.

Selengkapnya...

most expensive car in the world this century



This is the story of Sultan Hassanal Bolkiah. The owner of the kingdom that was just a piece on the edge of the island of Borneo. Gift of oil into the country with a population of 330 thousand is rich. Including the king, Sultan Bolkiah.

How not rich, he has a collection of 7000 cars that everything is stored in five giant garage near the royal palace. In fact, recently wrote the daily automotive GTSpirit Sultan's collection amounting to trillions of rupiah.

Collection of the king not just any car. Kind of mixed. The criteria are the most expensive, most beautiful, rarest, fastest, and most unique. He has a Bugatti Veyron which is the world's most expensive car today, around Rp20 billion. Not only do most expensive, the Veyron is also the fastest car version of the 2010 Super Cars.

Inauguration of the President: Sultan Hasanal BolkiahBolkiah also has six Rolls-Royce Phantom bulletproof very rare on earth. A line of luxury cars into his collection is a Porsche 959, Porsche Carrera GT, Lamborghini Diablo Jota, Lamborghini Murcielago LP640, Bugatti EB110, Maybach 62, Jaguar XJR-15 962s, and six Dauer.

He also has six Ferrari FX models, Bentley Continental R, Porsche Carma, Agera Koenigsegg CC GT, Ferrari mythos two concept cars, and Mercedes-Benz CLK-GTR, produced specifically for the Sultan.

The 29th Sultan of Brunei is also interested in racing cars. He even has a private museum of the cars that won the Formula One title since 1980. He bought the winning teams, including Velleneuve FW19 driven by the collision with Michael Schumacher in 1977.

Garage Sultan BolkiahMenurut Daily record Britain's The Daily Mirror, June 30, 2010, has 604 Rolls-Royce, Mercedes 574, 452 Ferraris, 382 Bentleys, 209 BMWs, 179 Jaguars, 134 Koenigseggs, 21 Lamborghinis, 11 Aston Martins, and 1 SSC. This amount is far more than in 2007. At that time, the Daily Mirror also lowers the news that he memiiliki 531 Mercedes, Ferrari 367, Bentley 362, 185 BMWs, 177 Jaguars, 160 Porsches, 130 Rolls-Royce, and 20 Lamborghinis.
Listen
Read phonetically
Selengkapnya...

The most expensive bike of the century





A half century ago, Sylvester Howard Roper designing his first motorcycle. Exactly 1860, Howard's work can be displayed at exhibitions circus in the eastern United States.

Then in the second world war, Europe contributed a lot to popularize motorcycle. At that time, the motor is used as a quick and simple transportation. Technology was growing. The motorcycle continued to be created more powerful and faster. Even one of the production Dodge motor, able to go above 600 km per hour.

Later, motor manufacturers do not just compete on speed and strength. They also compete in the uniqueness. Therefore, the price could soar. Here's a list of most expensive motorcycles in the world version of the Most Expensive Journal starting from the cheapest.

1. MV-Augusta F4CC
MV-Augusta F4CCSepeda this bike was created Claudio Castiglioni, MV director. He wants to create a spectacular motorcycle that meets the needs as well as something unique. Motorcycle with a price of U.S. $ 120 thousand or approximately Rp1, 08 billion is able to go 315 miles per hour.

Motor is equipped with 1078 cc engine and can produce 198 horsepower. F4CC only made 100 units with each motorcycle has a serial number on the disc platinum near the driver.

2. MTT Turbine Superbike
This bike priced at $ 150 thousand or Rp1, 35 billion. Equivalent to high price, this bike can jump quickly. MTT Turbine Superbike is known as Y2K Turbine which has previously been awarded the Guinness World Record as the most powerful motor ever mass-produced.

Turbine engines made by Rolls Royce and able to spend more power than 300 hp (horsepower). This bike also offers a carbon fiber frame, at the rear mounted camera with LCD color screen, front and rear radar detector equipped with a laser, one-touch Smart Start ignition, and many other cool devices. Motor is quite popular in Hollywood. MTT Turbine has starred in the movie Torque.

3. Icon Sheene
Icon SheeneMotor for U.S. $ 160 thousand or Rp1, 44 billion was made by Andrew Morris sebegai tribute to the legendary Grand Prix champion, Barry Sheene, who died in 2003.

Using a 1400cc turbocharged engine, this motorcycle can produce power 250 hp. This bike helmets will be painted by the painter Sheene, Mike Fairholme. Each motor will be booked in advance, adapted to the buyer.

4. Macchia Nera motorcycle concept

motorcycle concept is the concept NeraMeski Macchia, Macchia valued U.S. $ 201 thousand or approximately Rp1, 8 billion. This motor is built using a Ducati 998RS engine. Italian motorcycle designer, specially made Macchia is pretty and beautiful, yet simple.

Testastretta engine fitted with lightweight metal alloys, such as titanium and aluminum, so it is very mild.

5. Ecosse Titanium Series RR Limited Edition
Ecosse Titanium Series RR Limited EditionMotor is priced U.S. $ 275 thousand or Rp2, 5 billion. Ecosse Titanium has a chassis frame coated titanium with carbon fiber. Features engine using fuel injection, intercooler, supercharged 2150 cc and capable of producing 200 hp power.

Ergonomic saddle this bike and can be adjusted to taste. Motor is also equipped watch, designed by French watchmaker, BRM. This watch glow similar to a motor that produced only 10 units.

6. Dodge Tomahawk V10 superbike
Dodge Tomahawk V10 superbike Dibandrol U.S. $ 555 thousand or 5 billion, the Dodge Tomahawk concept motorcycle is reproduced from Dodge. Motor produced only 10 units and are offered at Christmas 2003. Dodge Tomahawk V10 superbike engines 8.3 liters and 10 cylinders. No wonder when the motor is able to go 640 km per hour. While acceleration 0-100 km per hour can be reached in 2.5 seconds.

vivanews.com
Selengkapnya...

introduce phothoshop for dummy lesson 1


Starting Adobe Photoshop and opening ?les

The Adobe Photoshop and Adobe ImageReady work areas include the command menus
at the top of your screen and a variety of tools and palettes for editing and adding
elements to your image. You can also add commands and ?lters to the menus by installing
third-party software known as plug-in modules.
In this part of the lesson, you’ll familiarize yourself with the Adobe Photoshop work area
and open a ?le in Adobe Photoshop.
Both Photoshop and ImageReady work with bitmapped, digitized images (that is,
continuous-tone images that have been converted into a series of small squares, or picture
elements, called pixels). In Photoshop, you can also work with vector graphics, which are
shapes made up of smooth lines that retain their crispness when scaled. In ImageReady,
you can create moving elements, such as animations and rollovers, for on-screen viewing.


You can create original artwork in both Photoshop and ImageReady, or you can bring
images into the program by scanning a photograph, a transparency, a negative, or a
graphic; by capturing a video image; or by importing artwork created in drawing
programs. You can also import previously digitized images—such as those produced by a
digital camera or by the Kodak® Photo CD process.
In this lesson, you’ll learn how to do the following:
• Open an Adobe Photoshop ?le.
• Select tools from the toolbox.
• Use viewing options to enlarge and reduce the display of an image.
• Work with palettes.
• Use online Help.
This lesson will take about 60 minutes to complete. The lesson is designed to be done in
Adobe Photoshop, but information on using similar functionality in Adobe ImageReady
is included where appropriate.

In this lesson, you’ll learn how to do the following:

• Open an Adobe Photoshop ?le.

• Select tools from the toolbox.

• Use viewing options to enlarge and reduce the display of an image.

• Work with palettes.

• Use online Help.This lesson will take about 60 minutes to complete. The lesson is designed to be done in Adobe Photoshop, but information on using similar functionality in Adobe ImageReady is included where appropriate.

introduce phothoshop for dummy lesson 1

Selengkapnya...