No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
 | Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim strsql As String = "Data Source=.ITSupport;" & _ "Initial Catalog=Information;Integrated Security=true" strsql = " insert into table_1 (name, address, age ) values ('" _ & txtname.Text & "','" _ & txtaddress.Text & "','" _ …  |
| | Public Class LoginForm1 Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\ahamdi2\Documents\Visual Studio 2008\Projects\sistemPengesanan\sistemPengesanan\admin.mdf;Integrated Security=True;User Instance=True") Dim cmd As New SqlCommand("SELECT * FROM info WHERE username = '" & UsernameTextBox.Text & "' AND [password] = '" & PasswordTextBox.Text & "' ", … |