|
|
|
รบกวนท่านผู้รู้ เข้ามาให้คำแนะนำ code vb.net + sql server หน่อยครับ นักศึกษามือไหม่ครับ |
|
|
|
|
|
|
|
Code สำหรับ Insert ข้อมูลด้วย VB.NET กับ SQL Server ส่วนการเขียน Event ต่าง ๆ อ่านได้จากบทความที่ได้แนะนำก่อนหน้านี้เลยครับ
Code (VB.NET)
Dim objConn As New SqlConnection
Dim objCmd As New SqlCommand
Dim strConnString,strSQL As String
strConnString = "Server=localhost;UID=sa;PASSWORD=;database=mydatabase;Max Pool Size=400;Connect Timeout=600;"
strSQL = "INSERT INTO customer (CustomerID,Name,Email,CountryCode,Budget,Used) " & _
" VALUES " & _
" ('" & Me.txtCustomerID.Text & "','" & Me.txtName.Text & "','" & Me.txtEmail.Text & "', " & _
" '" & Me.txtCountryCode.Text & "','" & Me.txtBudget.Text & "','" & Me.txtUsed.Text & "')"
objConn.ConnectionString = strConnString
objConn.Open()
With objCmd
.Connection = objConn
.CommandText = strSQL
.CommandType = CommandType.Text
End With
Me.pnlAdd.Visible = False
Try
objCmd.ExecuteNonQuery()
Me.lblStatus.Text = "Record Inserted"
Me.lblStatus.Visible = True
Catch ex As Exception
Me.lblStatus.Visible = True
Me.lblStatus.Text = "Record can not insert Error ("& ex.Message &")"
End Try
objConn.Close()
objConn = Nothing
|
|
|
|
|
Date :
2013-01-16 20:27:43 |
By :
mr.win |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ERROR นี้เกิดจากอะไรหรอคับ
|
|
|
|
|
Date :
2013-01-16 21:10:53 |
By :
gamekap |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Error อะไรคับ
|
|
|
|
|
Date :
2013-01-17 13:16:40 |
By :
pongtave |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 04
|