Hi,
I am developing a vb.net application in which i uploading
some paramenters which is given below
"FirstName,MiddleName,LastName,MyImage".
Uploading is done successfully but image is not showing at webpage. It is uploading FirstName, MiddleName, LastName not Myimage.
My Code is below:
myUri = New Uri("https://www.mysite.com/apis/CreateMyContact.cfm")
data = data.Append("&FirstName=" & System.Web.HttpUtility.UrlEncode(Dharm))
data = data.Append("&MiddleName=" & System.Web.HttpUtility.UrlEncode(Chand))
data = data.Append("&LastName=" & System.Web.HttpUtility.UrlEncode(Dhingra))
data = data.Append("&NickName=" & System.Web.HttpUtility.UrlEncode(Dharmu))
Dim fs As System.IO.FileStream = Nothing
Dim imgByte() As Byte = Nothing
Try
fs = System.IO.File.Open(image_path, IO.FileMode.Open, FileAccess.Read)
ReDim imgByte(fs.Length)
fs.Read(imgByte, 0, fs.Length)
fs.Close()
fs.Dispose()
fs = Nothing
Catch ex As System.Exception
End Try
If Not IsNothing(imgByte) Then
data = data.Append("&PhotoBinary=" & System.Web.HttpUtility.UrlEncode(imgByte)) 'image_path)) '
End If
'Create a byte array of the data we want to send
Dim requestBytes As Byte() = System.Text.UTF8Encoding.UTF8.GetBytes(data.ToString())
Dim oWeb As New System.Net.WebClient()
oWeb.Headers.Add("Content-Type", "application/x-www-form-urlencoded")
Try
Dim bytRetData As Byte() = oWeb.UploadData(myUri, "POST", requestBytes)
Catch ex As WebException
End Try
This code is working successfully but image is not uploading.
Please guide me if i did wrong something in code.
Regards
Dharmchand dhingra
Loading
paul danielPosted Dec 31, 2009, 8:40 AM
Refer this link
http://www.codeproject.com/KB/aspnet/simpleuploadimage.aspx
Thanks,
Paul daniel
Lalit MPosted Dec 16, 2009, 1:36 AM
Dim intImageSize As Int64
Dim strImageType As String
Dim ImageStream As Stream
' Gets the Size of the Image
intImageSize = PersonImage.PostedFile.ContentLength
' Gets the Image Type
strImageType = PersonImage.PostedFile.ContentType
' Reads the Image
ImageStream = PersonImage.PostedFile.InputStream
Dim ImageContent(intImageSize) As Byte
Dim intStatus As Integer
intStatus = ImageStream.Read(ImageContent, 0, intImageSize)
' Create Instance of Connection and Command Object
Dim myConnection As New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
Dim myCommand As New SqlCommand("sp_person_isp", myConnection)
' Mark the Command as a SPROC
myCommand.CommandType = CommandType.StoredProcedure
' Add Parameters to SPROC
Dim prmPersonImage As New SqlParameter("@PersonImage", SqlDbType.Image)
prmPersonImage.Value = ImageContent
myCommand.Parameters.Add(prmPersonImage)
Dim prmPersonImageType As New SqlParameter("@PersonImageType", SqlDbType.VarChar, 255)
prmPersonImageType.Value = strImageType
myCommand.Parameters.Add(prmPersonImageType)
Try
myConnection.Open()
myCommand.ExecuteNonQuery()
myConnection.Close()
Response.Write("New person successfully added!")
Catch SQLexc As SqlException
Response.Write("Insert Failed. Error Details are: " & SQLexc.ToString())
End Try
Go through this link complete info
you will get another example here ---->Thanks,,
Dharmchand DhingraPosted Dec 16, 2009, 1:27 AM
Thanks for response.
I need to upload image at server not in database. can u give me link which show example of upload image at server.
Regards
Dharmchand Dhingra
Srinivas KotraPosted Dec 14, 2009, 8:59 AM