Ciemnawy sqlConn Jako SqlClient.SqlConnection
Ciemnawy sqlCmd Jako SqlClient.SqlCommand
Ciemnawy strConnection Sznurek
'Dostawać związek sznurek od App.Config (Musieć system.configuration i odniesienie system konfiguracja
strConnection = ConfigurationManager.ConnectionStrings ("hoh_schoolwear_v1. _0.My.MySettings.pitl_hoh_schoolwear") .ConnectionString
sqlConn = Nowy SqlConnection (strConnection)
sqlCmd = Nowy SqlCommand ("Wybiórka * OD tbl_users DOKĄD username = '" & txtUsername.Text & "'", sqlConn)
sqlConn.Open ()
Ciemnawy dr Jako SqlClient.SqlDataReader
dr = sqlCmd .ExecuteReader
Podczas Gdy dr. Czytać ()
txtEmail.Text = dr ("email")
txtUsername.Text = dr ("username")
…
Kończyć Podczas Gdy
Chwyt
Końcówka Próba
dr. Zamykać ()
sqlCon.Close ()
|