好的,这是我在这个网站上使用的代码。一切正常,但我需要一些不同的代码上传图像,我不知道该怎么办 - 这是代码 -
Private Sub btnAttach_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnAttach.Click
Dim iLength As Integer = CType(File1.PostedFile.InputStream.Length, Integer)
If iLength = 0 Then Exit Sub 'not a valid file
Dim sContentType As String = File1.PostedFile.ContentType
Dim sFileName As String, i As Integer
Dim bytContent As Byte()
ReDim bytContent(iLength) 'byte array, set to file size
'strip the path off the filename
i = InStrRev(File1.PostedFile.FileName.Trim, "\")
If i = 0 Then
sFileName = File1.PostedFile.FileName.Trim
Else
sFileName = Right(File1.PostedFile.FileName.Trim, Len(File1.PostedFile.FileName.Trim) - i)
End If
Try
File1.PostedFile.InputStream.Read(bytContent, 0, iLength)
With cmdInsertAttachment
.Parameters("@FileName").Value = sFileName
.Parameters("@FileSize").Value = iLength
.Parameters("@FileData").Value = bytContent
.Parameters("@ContentType").Value = sContentType
.ExecuteNonQuery()
End With
Catch ex As Exception
'Handle your database error here
dbConn.Close()
End Try
Response.Redirect(Request.Url.ToString) 'Refresh page
End Sub
一切正常,除非涉及到这一部分 -
With cmdInsertAttachment
.Parameters("@FileName").Value = sFileName
.Parameters("@FileSize").Value = iLength
.Parameters("@FileData").Value = bytContent
.Parameters("@ContentType").Value = sContentType
.ExecuteNonQuery()
End With
我没有这些参数。我在sql server表中只有1个字段,表示Img并且有image数据类型。我如何使用此代码使用此insert语句在db中获取我的图像? 插入table1(img)值(???)
答案 0 :(得分:0)
考虑将表更改为具有FileName,FileSize,FileData和ContentType字段。
如果您确实不想存储在数据库中的名称,大小和内容类型,那么您可以更改
With cmdInsertAttachment
.Parameters("@FileName").Value = sFileName
.Parameters("@FileSize").Value = iLength
.Parameters("@FileData").Value = bytContent
.Parameters("@ContentType").Value = sContentType
.ExecuteNonQuery()
End With
到
With cmdInsertAttachment
.Parameters("@Img").Value = bytContent
.ExecuteNonQuery()
End With
在适当编辑cmdInsertAttachment存储过程之后,应该获取表中的数据。你之后可以用它做什么,但是有人猜不到。