สอบถามการแสดงรูปภาพจาก Sql Server ใน VB จากเครื่อง Server
พอดีเขียนโปรแกรมเป็น win app โดยเชื่อต่อกับ SQL SERVERCode (VB.NET) strsql = "INSERT INTO Purchase_Machine(PO_no ,Mac_no ,Date ,Sup_id)"
strsql &= "VALUES('" & txtPO.Text & "' ,'" & txtMachineNo.Text & "' ,'" & txtDate.Text & "' ,'" & txtSupID.Text & "')"
With cmd
.Connection = con
.CommandText = strsql
.CommandType = CommandType.Text
.ExecuteNonQuery()
End With
Code (VB.NET) Private Sub dgvMachine_CellClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgvMachine.CellClick
If e.RowIndex = -1 Then Exit Sub
With dgvMachine
PictureBox1.Image = Image.FromFile(path)
End With
End Sub
Tag .NET, Ms SQL Server 2012, Win (Windows App), VB.NET, VS 2010 (.NET 4.x)
Date :
2017-06-30 14:06:06By :
PreeyapanView :
921Reply :
3
ขอโทษคะ โค้ดบันทึก เป็นโค้ดนี้คะCode (VB.NET) strsql = "INSERT INTO Machine(Mac_no ,Mac_name ,Line_id ,Sup_id ,FileName)"
strsql &= "VALUES('" & txtMachineNo.Text & "' ,'" & txtMachineName.Text & "' ,'" & cbxLineID.Text & "' ,'" & txtSupID.Text & "' ,'" & txtpath.Text & "')"
With cmd
.Connection = con
.CommandText = strsql
.CommandType = CommandType.Text
.ExecuteNonQuery()
MessageBox.Show("Create Machine Master List in database complete.", "Create Machine Master List", MessageBoxButtons.OK, MessageBoxIcon.Information)
End With
Date :
2017-06-30 14:09:29By :
Preeyapan
Date :
2017-07-01 10:05:01By :
mr.win
Server 03
Load balance : Server 03
