2010-03-09 5 views
0

J'ai besoin de télécharger et d'afficher des images vers et à partir de la base de données. J'ai écrit ce code pour le téléchargement et il télécharge bien. sauf 1 problème. Il se bloque quand je ne sélectionne pas une image. quelqu'un peut-il m'aider à le réparer pour une valeur nulle? aussi comment affichez-vous une image dans IE?insérer et afficher l'image dans vb.net depuis la base de données du serveur SQL

Code

pour insérer l'image -

Dim imageInfo As FileInfo = Nothing 
Dim data() As Byte = Nothing 
imageInfo = New FileInfo(Me.UploadLogo.Value.Trim()) 
Dim imagestream As FileStream = New FileStream(imageInfo.ToString, FileMode.Open) 

if name_id > 0 
    ReDim data(imagestream.Length - 1) 
    imagestream.Read(data, 0, imagestream.Length) 
    imagestream.Close() 
    Sqlstr = "UPDATE logos WITH(ROWLOCK) " & _ 
      "SET [email protected],Modified_Date=GETDATE() " & _ 
      "WHERE ID = " + name_id.ToString + "" 
Else 
    Sqlstr = "INSERT logos (Logo,Created_Date) " & _ 
      "VALUES ("@Logo,GETDATE())" 
End If 

SqlCmd = New SqlCommand(Sqlstr, SqlCnn) 
Dim pictureParameter As SqlParameter = Nothing 
pictureParameter = New SqlParameter("@Logo", SqlDbType.Image) 
pictureParameter.Value = data 
SqlCmd.Parameters.Add(pictureParameter) 
SqlCmd.ExecuteScalar() 

cela fonctionne bien que si une image est sélectionnée, plante pour les valeurs NULL. Aussi s'il vous plaît aidez-moi avec l'affichage de l'image. grâce

Répondre

0

Pour résoudre votre « fichier sélectionné problème », vous devriez avoir une déclaration Si le long des lignes de:

If Not File.Exists(Me.UploadLogo.Value.Trim()) 
    ' Exit out or handle no file selected 
End If 
Questions connexes