Hey guys, i need to translate a code from php to vb.net, but i still can't do it
so maybe one of you can help me ?
heres the php script :

<?php
/*
|-------------------------------------------------------------------
| Database Connection Details
|-------------------------------------------------------------------
*/
$mysql_host = "5.48.112.100";
$mysql_user = "root";
$mysql_pass = "TheShorty";
$mysql_db = "account";
/*
|-------------------------------------------------------------------
| Connect with Database
|-------------------------------------------------------------------
*/
mysql_connect($mysql_host, $mysql_user, $mysql_pass) OR
die("Es konnte keine Verbindung zur Datenbank hergestellt werden.
Fehlermeldung: ".mysql_error());

mysql_select_db($mysql_db) OR
die("Die Datenbank konnte nicht benutzt werden.
Fehlermeldung: ".mysql_error());

import System
import System.Data

import MySql.Data
import MySql.Data.MySqlClient

Public void mysqlconnection()
{
Dim connStr = _
"server=5.48.112.100;user=root;database=account;port=3306;password=TheShorty;"
Dim conn as MySqlConnection = new MySqlConnection(connStr)
Dim sql as string =""
try
{
conn.Open() 'equivalent to mysql_connect($mysql_host, $mysql_user, $mysql_pass)
'mysql_select_db($mysql_db) 
'at this point you have already selected the db, just go ahead sql query;
sql = "SELECT * FROM table"
Dim cmd as MYSqlCommand = new MYSqlCommand(sql,conn)
Dim rdr as MYsqlDataReader = cmd.ExecuteReader()

while(rdr.Read())
{
System.Diagnosics.Debug.Print("1st column value in db:" + rdr(0))
}
rdr.close()
}
catch(ex as Exception)
{
MessageBox(ex.message.tostring())
}
conn.Close()

}

Download connector from http://dev.mysql.com/downloads/connector/net/
install and call this code from anywhere in your code.

You're using PHP scripts as a programming guide? Ookay.