HOME > .NET Framework > Forum > ทำไมผมอัพ Update ข้อมูลแล้วทำไม มันมึงแบบนี้อ่าครับ งงจุง executescalar : commandtext property has not been initialized
ทำไมผมอัพ Update ข้อมูลแล้วทำไม มันมึงแบบนี้อ่าครับ งงจุง executescalar : commandtext property has not been initialized
rivate Sub insert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles insert.Click
Dim myCommand As SqlCommand = New SqlCommand(str, connetionString)
str = "UPDATE inputdata SET password = '" & password.Text & "' WHERE users ='" & user.Text & "'"
Try
connetionString.Open()
Dim result = myCommand.ExecuteScalar()
If result Is Nothing Then
MessageBox.Show("คุณต้องการแทรกใช่หรือไม่?", "ยืนยัน", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
' End If
MessageBox.Show("แทรกรายชื่อพนักงานแล้ว", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information) : Exit Sub
' Call .showData()
ElseIf result IsNot Nothing Then
' Dim str = myCommand.ExecuteScalar()
MessageBox.Show("ไม่สามารถ", "ยืนยัน", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
End If
Catch ex As Exception
' MessageBox.Show("ไม่สามารถที่จะแทรกได้", "ยืนยัน", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
MessageBox.Show(ex.Message)
If (connetionString.State = ConnectionState.Open) Then
connetionString.Close()
End If
End Try
End Sub
Tag : .NET, Ms SQL Server 2008, Ms SQL Server 2012, VB.NET, VS 2008 (.NET 3.x), VS 2010 (.NET 4.x)
Dim objConn As SqlConnection
Dim objCmd As SqlCommand
Dim strConnString,strSQL As String
Dim myScalar As Object
strConnString = "Server=localhost;UID=sa;PASSWORD=;database=mydatabase;Max Pool Size=400;Connect Timeout=600;"
objConn = New SqlConnection(strConnString)
objConn.Open()
strSQL = "SELECT MAX(Used) FROM customer"
objCmd = New SqlCommand()
With objCmd
.Connection = objConn
.CommandType = CommandType.Text
.CommandText = strSQL
End With
myScalar = objCmd.ExecuteScalar()
Load balance : Server 01
Quote:
