Hey,
I have a database interaction file in vb. net where in I am connecting to database and I am inserting the image files in the SQL server 2005 database.
The Code works fine on my machine but when I uploaded the site , an error occured saying "Object Reference is not set to an instance of an object" at
SaveInspectionObservationImages(ByVal dt As DataTable)
The Code for this Function is as follows...
Public Function SaveInspectionObservationImages(ByVal dt As DataTable) As Boolean ' Here I am passing the Images which are in datatable.
Dim sqlImageInsertTransaction As SqlTransaction
Dim blnFlagTransaction As Boolean = False
sqlConnection = New SqlConnection
sqlConnection.ConnectionString = "server=" & System.Configuration.ConfigurationManager.AppSetti ngs("server") & ";packet size=4096;user id=" & System.Configuration.ConfigurationManager.AppSetti ngs("user") & ";password=" & System.Configuration.ConfigurationManager.AppSetti ngs("password") & ";initial catalog=" & System.Configuration.ConfigurationManager.AppSetti ngs("initialcatalog") & ";persist security info=" & System.Configuration.ConfigurationManager.AppSetti ngs("persistSecurityInfo") & ""
Try
sqlConnection.Open()
sqlDA = New SqlDataAdapter()
sqlImageInsertTransaction = sqlConnection.BeginTransaction()
For Each dr As DataRow In dt.Rows
Dim myImageBuffer() As Byte
Dim blnFlag As Boolean = False
If FileIO.FileSystem.FileExists(dr.Item("ImageName")) Then
If FileExtensionIsApproved(System.IO.Path.GetExtensio n(dr.Item("ImageName"))) Then
Dim myStream As New FileStream(dr.Item("ImageName"), FileMode.Open, FileAccess.Read)
myImageBuffer = New Byte(myStream.Length - 1) {}
myStream.Read(myImageBuffer, 0, CInt(myStream.Length))
myStream.Close()
blnFlag = True
End If
End If
sqlDA.SelectCommand = New SqlCommand("dbo.SaveHighwayInspectionObservationIm ages", sqlConnection)
sqlDA.SelectCommand.CommandType = CommandType.StoredProcedure
sqlDA.SelectCommand.Transaction = sqlImageInsertTransaction
'Add Parameters
Dim paramInspectionObservationChainageSideID As SqlParameter = New SqlParameter()
paramInspectionObservationChainageSideID.Parameter Name = "@iInspectionObservationDamageID"
paramInspectionObservationChainageSideID.SqlDbType = SqlDbType.BigInt
paramInspectionObservationChainageSideID.Direction = ParameterDirection.Input
paramInspectionObservationChainageSideID.Value = dr.Item("Inspection_Observation_Damage_ID")
Dim paramImageName As SqlParameter = New SqlParameter()
paramImageName.ParameterName = "@vImageName"
paramImageName.SqlDbType = SqlDbType.VarChar
paramImageName.Direction = ParameterDirection.Input
paramImageName.Value = System.IO.Path.GetFileName(dr.Item("ImageName"))
Dim paramDescription As SqlParameter = New SqlParameter()
paramDescription.ParameterName = "@vDescription"
paramDescription.SqlDbType = SqlDbType.VarChar
paramDescription.Direction = ParameterDirection.Input
paramDescription.Value = dr.Item("Description")
Dim paramObservationImage As SqlParameter = New SqlParameter()
paramObservationImage.ParameterName = "@iObservationImage"
paramObservationImage.SqlDbType = SqlDbType.Image
paramObservationImage.Direction = ParameterDirection.Input
If blnFlag Then
paramObservationImage.Value = myImageBuffer
Else
paramObservationImage.Value = DBNull.Value
End If
'cmd.Parameters.Add(paramReturnValue); // must be added first, parameter 0
sqlDA.SelectCommand.Parameters.Add(paramInspection ObservationChainageSideID)
'sqlDA.SelectCommand.Parameters.Add(paramImagesToD elete)
sqlDA.SelectCommand.Parameters.Add(paramImageName)
sqlDA.SelectCommand.Parameters.Add(paramDescriptio n)
sqlDA.SelectCommand.Parameters.Add(paramObservatio nImage)
sqlDA.SelectCommand.ExecuteNonQuery()
Next
sqlImageInsertTransaction.Commit()
Catch ex As Exception
blnFlagTransaction = True
If Not sqlConnection Is Nothing Then
sqlConnection.Close()
End If
Throw ex
Finally
If blnFlagTransaction Then
If Not sqlConnection Is Nothing Then
sqlDA.SelectCommand.Transaction.Rollback()
End If
Else
If Not sqlConnection Is Nothing Then
sqlConnection.Close()
End If
End If
End Try
Return Not blnFlagTransaction
End Function
This Code works fine on my local machine but fails when uploaded...
I dont know how to rectify it please help me!
Thanks a lot....