Εχω μια εφαρμογή VB.NET η οποία κάνει post κάποια δεδομένα απο Access σε μια βαση Access στο Internet
Εφαρμογή:
PostData = "name=" & txtname.Text & "&address=" & Address.Text
URL = "http://www.web.com/add_customer.aspx"
Dim httprequest As HttpWebRequest
Dim httpresponse As HttpWebResponse
Dim BodyReader As StreamReader
Dim BodyText As String = ""
Dim ResponseStream As Stream
Dim RequestStream As Stream
httprequest = CType(WebRequest.Create(URL), HttpWebRequest)
httprequest.Method = "POST"
httprequest.ContentType = "application/x-www-form-urlencoded"
httprequest.ContentLength = PostData.Length
RequestStream = httprequest.GetRequestStream()
RequestStream.Write(Encoding.Default.GetBytes(PostData), 0, PostData.Length)
RequestStream.Close()
httpresponse = CType(httprequest.GetResponse(), HttpWebResponse)
ResponseStream = httpresponse.GetResponseStream()
BodyReader = New StreamReader(ResponseStream)
BodyText = BodyReader.ReadToEnd
Web εφαρμογή:
Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("fpdb/customers.mdb")
Dim MySQL As String = "Insert into customers (name, address) " & _
"Values (@name, @Address)"
Dim MyConn As New OleDbConnection(strConn)
Dim Cmd As New OleDbCommand(MySQL, MyConn)
With Cmd.Parameters
.Add(New OleDbParameter("@name", Request("name")))
.Add(New OleDbParameter("@email", Request("address")))
End With
MyConn.Open()
Try
Cmd.ExecuteNonQuery()
Response.Write("Your information has been successfully posted.")
Catch ex As Exception
Response.Write(ex.Message)
End Try
MyConn.Close()
To πρόβλημα είναι οτι τα Ελληνικά εμφανίζονται σαν κουτάκια
Καμιά ιδέα;