thanks grooshopper but i resolve my probleme here my code is now

Dim

sqlcon As New SqlClient.SqlConnection

sqlcon.ConnectionString =

"Data Source=WISEMAN\SQLEXPRESS;Initial...