sql如何插入图片?
我现在想用sql语句插入一些图片,前台是VB,后台是SQL.这些图片有可能是*,bmp,也有可能是*.ico,但是我现在想知道如何插入图片?我是这样做的,先在VB用commondialog,做一个询问路径,然后在用Sql语句插入,不知道这样行不行?具体语句如下:
Private Sub cmd_open_Click()
On Error Resume Next
'打开文件夹,选择图片按钮
Dim pathname As String
cd.Filter = "*.jpg|*.JPG|*.bmp|*.BMP|*.ico|*.ico"
cd.ShowSave
If Err.Number <> 0 Then
ShowSave = False
End If
pathname = cd.FileName
Text1.Text = pathname
End Sub
****************************************************
Private Sub cmd_add_Click()
'添加按钮
Dim insertstr As String
insertstr = "insert into T_picid (F_image) " & _
"values('" & pathname & "')" & _
"where F_id='" & Grid.TextMatrix(Grid.Row, 2) & "'"
cn.Execute insertstr
End Sub
我现在想用sql语句插入一些图片,前台是VB,后台是SQL.这些图片有可能是*,bmp,也有可能是*.ico,但是我现在想知道如何插入图片?我是这样做的,先在VB用commondialog,做一个询问路径,然后在用Sql语句插入,不知道这样行不行?具体语句如下:
Private Sub cmd_open_Click()
On Error Resume Next
'打开文件夹,选择图片按钮
Dim pathname As String
cd.Filter = "*.jpg|*.JPG|*.bmp|*.BMP|*.ico|*.ico"
cd.ShowSave
If Err.Number <> 0 Then
ShowSave = False
End If
pathname = cd.FileName
Text1.Text = pathname
End Sub
****************************************************
Private Sub cmd_add_Click()
'添加按钮
Dim insertstr As String
insertstr = "insert into T_picid (F_image) " & _
"values('" & pathname & "')" & _
"where F_id='" & Grid.TextMatrix(Grid.Row, 2) & "'"
cn.Execute insertstr
End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货