Using MSAgent on Your VB .NET Aplication

MSAgent or Microsoft Agent is a software technology that enables an enriched form of user interaction that can make using and learning to use a computer, easier and more natural.

With the Microsoft Agent set of software services, developers can easily enhance the user interface of their applications and Web pages with interactive personalities in the form of animated characters. These characters can move freely within the computer display, speak aloud (and by displaying text onscreen), and even listen for spoken voice commands. When used effectively with a conversational interface approach, Microsoft Agent can be a powerful extension and enhancement of the existing interactive modalities of the Microsoft Windows interface.

Bellow is the example code To use MSAgent on Visual Basic .NET..

Public Class Form1
Inherits System.Windows.Forms.Form
Dim Character As AgentObjects.IAgentCtlCharacter
Dim sChar As String

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
try
' The path to the character file
sChar = Application.StartupPath & "\merlin.acs"
' Load the character
agtAgent.Characters.Load("merlin.acs", sChar)

' Set the "Character" declaration to be the character
' just loaded
Character = agtAgent.Characters("merlin.acs")

' Set the character's language to english
Character.LanguageID = &H409

'Show the Agent Character into Desktop
Character.Show()

'Make the agent to Move
Character.MoveTo(1100, 600, 5)

'Make the agent to play some animations..
Character.Play("Surprised")

Catch ex As Exception
MessageBox.Show("Description: " & _
ex.Message, "Error!", MessageBoxButtons.OK, _
MessageBoxIcon.Warning)
End Try

End Sub
End Class

If you didn't have MSAgent on your Computer, you can download it from http://www.microsoft.com/msagent/downloads/.

For demo Aplication Click here to download file

For Source Code Click here to download file

[NEW] Hacking Friendster Private Photo Part 2

Tomorrow when i look in internet, i found some interesting site. In that site,they give script to see friendster private photos.. Just open url bellow and enter the friendster target uid, and you can see the private photo that contain in that uid.

The URL are :

http://www.pusatbokep.com/FS.php

OR

http://www.pusatbokep.com/FS2.php

Hope usefull for you all..^^

[NEW] Hacking Private Photo Friendster

In FRIENDSTER, some people can hide some photos that they upload into friendster albums. Usually this photos is private picture or something like secret picture. If we want to see that picture, we must ask permission from the owner..
2 days ago, i found some hacking into this private photo, so we can see private photos from other people friendster account..
The 3 things that you must do to see the private photo is
1. target uid

example : http://www.friendster.com/53349334

41082848 - is target UID ( it's just example, so find your target first )

2. target album id write this address into your addressbar http://www.friendster.com/viewalbums.php?uid="Your target uid here"

example : http://www.friendster.com/viewalbums.php?uid=53349334

Select View - Page Source from the browser menu, and then find "abAlbumPrivacy" near the word private

example :

 "abAlbumPrivacy-1" -- all you need is the number in the end of word,
in this case the number is 1 ( one )  

3. Open
http://www.friendster.com/photolist_ajax.php?uid="your target uid here"&a="album privacy id here"&page=0

example :
http://www.friendster.com/photolist_ajax.php?uid=53349334&a=1&page=0

You will get result like this..

{"photos":[{"isPrimary":"0","privacy":"1","pid":"1","rid":"851208344","album_id":"1","guid":"b799e48214..etc.

All you need is "rid":"851208344" -- remember the number "851208344" this is the photo id .

After the three thing finished, go back to the http://www.friendster.com/viewalbums.php?uid=53349334

right click on one of the image that apear, and then choose properties. See under the image properties

location : ....

example :

location : http://photos-p.friendster.com/photos/43/39/53349334/1_363513051m.jpg

Copy the url into your address bar, and then replace the name of image with number that you got before..

example :

before - http://photos-p.friendster.com/photos/43/39/53349334/1_363513051m.jpg

the name of image is 1_363513051m.jpg, replace 363513051m with "851208344" that you get from "rid":"851208344", so now become 1_851208344.jpg

after - http://photos-p.friendster.com/photos/43/39/53349334/1_851208344.jpg

Now you will see the private photos..^^

NB : if your target have more than one private photos, they must be have more than "rid":"851208344" texts, just search the other number than "851208344" and do the last process in this article again.. Just use your brain.. =p

Text to Speech with VB .NET

Now Technology is very awesome and wonderfull.. Computer can do a some thing with our command, not just like that now computer can read text that we type and translate it into voice or Text to Speech.. Yesterday i try to make a little code with VB .NET to implement this text to Speech function to make an alarm. This alarm with alert us when this is time to lunch, dinner, or time to sleep. This aplication will also give a welcome message while the aplication loaded and good bye message if the aplication closed. All message will alert us with voice..

Bellow is the simple function to make texts that user input will be read with computer and translate it into voice.

Private Sub talk(ByVal str As String)
Dim oVoice As New SpeechLib.SpVoice
Dim cpFileStream As New SpeechLib.SpFileStream

'Set the voice type male or female and etc
oVoice.Voice = oVoice.GetVoices.Item(cmbVoices.SelectedIndex)

'Set the voice volume
oVoice.Volume = trVolume.Value

'Set the text that will be read by computer
oVoice.Speak(str, SpeechLib.SpeechVoiceSpeakFlags.SVSFDefault)
oVoice = Nothing
End Sub

To use this simple function, just insert the text that we want to be readed into function parameter

Example : talk("Hello World") ' This Function will make computer talk "Hello World"

For demo Aplication Click here to download file

For Source Code Click here to download file

If you find an interesting things please share with me..^^

VB .NET to MySQL Database Connection

VB.NET is one of the most famous programming language. It's because .NET have a many feature and make programming more easy. In general, SQL Server is the database server that usualy used by user to store their data. But we can use another database that we can use. In this case, we will use MySQL. MySQL is one of database engine that used by many people in the world.

To make connection from VB.NET into MySQL we must do the following thing :
1. Download MySQL database engine from http://dev.mysql.com/downloads/

2. Install the MySQL

3. After that, you must download the connector from VB.NET into MySQL from www.mysql.com/products/connector/net

4. To use the connector, just Import the reference of MySQL DotNet Connector from Project->Add Reference

5. Make one module to do a connection into MySQL

Imports MySql.Data.MySqlClient

Module Connect
Public conn As New MySqlConnection

Public Sub ConnectDatabase()

Try
If conn.State = ConnectionState.Closed Then
conn.ConnectionString = "DATABASE=" & your database &";" _
& "SERVER=" & your host & ";user id=" & your username _
& ";password=" & your password & ";port=" & Your MySQL Port (3306) & ";charset=utf8"

conn.Open()
End If

Catch myerror As Exception
MsgBox("Connection Error")
End
End Try
End Sub

Public Sub DisconnectDatabase()
Try
conn.Close()
Catch myerror As MySql.Data.MySqlClient.MySqlException

End Try
End Sub
End Module

6. To connect to MySQL, just call the ConnectDatabase() from your form_load event