vahid4251

سلام . من یه پروژه بیمارستان خریدم . ولی از این قسمت کد سر در نمیارم میشه کمک کنید .

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click

Dim connection_string As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=""" & Application.StartupPath & "\kilinik.mdf"";Integrated Security=True;Connect Timeout=30;User Instance=True"
Using myconnection As New SqlConnection(connection_string)
Using mycommand As New SqlCommand()
myconnection.Open()
mycommand.Connection = myconnection
Dim q As String = "insert into bimran values('" & TextBox0.Text & "','" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "')"
mycommand.CommandText = q
mycommand.ExecuteNonQuery()
MessageBox.Show("اطلاعات با موفقیت در پایگاه ثبت شد")

End Using
End Using
gridview()

End Sub


لطفا کمک کنید .
با تشکر .