2013-03-16 73 views
1

我是VB.NET的初学者,所以您可能需要忍耐一下,但我需要在后面编辑此代码,以便将空值传递到我的数据库以获得'imageurl'领域。前端是一个网页表单,用户可以输入书籍的详细信息,并可选择上传书籍封面。将NULL值传递给一个GUID

我想更改我的代码,以便如果文件上传对话框不满足hasFile,数据库中生成的GUID字符串将是一个NULL值(这是因为我可以使用“无图像可用”图像在ASP NullImageUrl财产。)

这是我试过到目前为止实现,但智能感知告诉我,“String类型的值不能转换为‘的System.Guid’。

代码背后:

Imports System.Data.OleDb 
Partial Public Class addBook 
Inherits System.Web.UI.Page 

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 

End Sub 

Protected Sub btn_submission_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btn_submission.Click 
    Dim noFile As String = Nothing 
    Dim myGUID = Guid.NewGuid() 
    Dim newFileName As String = myGUID.ToString() & ".jpg" 
    Dim fileLocationOnServerHardDisk = Request.MapPath("img/thumb") & "/" & newFileName 
    If fu_picture.HasFile Then 
     fu_picture.SaveAs(fileLocationOnServerHardDisk) 
    Else 
     myGUID = noFile 
    End If 
    Dim oleDbConn As New OleDb.OleDbConnection(ConfigurationManager.ConnectionStrings("BookMeetConnString").ConnectionString) 
    Dim SqlString As String = "Insert into booklist(Title,Author,PublicationDate,Pages,Publisher,Blurb,imgurl,AverageRating) 
Values (@f1,@f2,@f3,@f4,@f5,@f6,@f7,@f8)" 
    Dim cmd As OleDbCommand = New OleDbCommand(SqlString, oleDbConn) 
    cmd.CommandType = CommandType.Text 
    cmd.Parameters.AddWithValue("@f1", tb_booktitle.Text) 
    cmd.Parameters.AddWithValue("@f2", tb_bookauthor.Text) 
    cmd.Parameters.AddWithValue("@f3", tb_bookpubyear.Text) 
    cmd.Parameters.AddWithValue("@f4", tb_bookpages.Text) 
    cmd.Parameters.AddWithValue("@f5", tb_publisher.Text) 
    cmd.Parameters.AddWithValue("@f6", tb_blurb.Text) 
    cmd.Parameters.AddWithValue("@f7", "img/thumb/" & newFileName) 
    cmd.Parameters.AddWithValue("@f8", rbl_Stars.SelectedValue) 
    oleDbConn.Open() 
    cmd.ExecuteNonQuery() 
    System.Threading.Thread.Sleep("2000") 
    Response.Redirect("~/addedrecord.aspx") 

End Sub 

Protected Sub rbl_Stars_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles rbl_Stars.SelectedIndexChanged 

End Sub 
End Class 

请告诉我,如果我完全错了我的思路!

编辑:在这个当下,即使文件没有上传,在数据库表中生成一个GUID字符串+ JPG后缀即使图像本身不存在

+0

试试'myGUID = Nothing'。 – Steve 2013-03-16 17:04:18

回答

3

你应该通过DBNull.Value你的数据库,如果你不要求

cmd.Parameters.AddWithValue("@f7", _ 
       if(fu_picture.HasFile, "img/thumb/" & newFileName, DbNull.Value) 

ternary operator允许在创建参数你只是测试的标志HasFile。
如果它为false,则将参数值设置为DBNull.Value。如果HasFile为true,则可以构建到图像文件的正确路径。当然,这消除了在代码之前将Nothing分配给myGuid的必要性。

+0

谢谢,这是完美的! – adaam 2013-03-16 17:13:09