Heidari66
چهارشنبه 14 مرداد 1394, 23:31 عصر
سلام
اشتباه این کد چیه؟
داده هارو اشتباه وارد میکنه:
Dim sss As String
Dim dd As String = "#013950005177689,1149,150805,11000001,11,12,13,14, 15,16,17,18,0F*"
Dim arr As String() = Split(dd, ",")
For Each sss In arr
Try
Dim conn As MySqlConnection
Dim cmd As MySqlCommand
conn = New MySqlConnection(EtesalMysql)
conn.Open()
cmd = conn.CreateCommand
cmd.CommandText = "INSERT INTO mh1 (macc,timee,datee,sens,s1,s2,s3,s4,s5,s6,s7,s8,che ckss ) VALUES ('" +
sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "')"
cmd.ExecuteNonQuery()
cmd.Dispose()
conn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
Next
اشتباه این کد چیه؟
داده هارو اشتباه وارد میکنه:
Dim sss As String
Dim dd As String = "#013950005177689,1149,150805,11000001,11,12,13,14, 15,16,17,18,0F*"
Dim arr As String() = Split(dd, ",")
For Each sss In arr
Try
Dim conn As MySqlConnection
Dim cmd As MySqlCommand
conn = New MySqlConnection(EtesalMysql)
conn.Open()
cmd = conn.CreateCommand
cmd.CommandText = "INSERT INTO mh1 (macc,timee,datee,sens,s1,s2,s3,s4,s5,s6,s7,s8,che ckss ) VALUES ('" +
sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "','" + sss + "')"
cmd.ExecuteNonQuery()
cmd.Dispose()
conn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
Next