Very Computer

What should i do ? change the way i sending , change the ASP page ?

I tried this but don't work
ps. oMsg: an Instance of  Microsoft.XMLHTTP

 oMsg.setRequestHeader("encoding","ISO-8859-1")

ps. oMsg an Instance of  Microsoft.XMLHTTP

tks in advance

Quote:> I criated a xml with the ADO rs.save method and send it through the
XMLHTTP
> POST .I having problems when i receive it in my ASP page, all words
that
> have any  foriegn caracters like , , ? , I receive with stranger
> caracters in place of  this caracters.

> What should i do ? change the way i sending , change the ASP page ?

> I tried this but don't work
> ps. oMsg: an Instance of  Microsoft.XMLHTTP

>  oMsg.setRequestHeader("encoding","ISO-8859-1")

> ps. oMsg an Instance of  Microsoft.XMLHTTP

> tks in advance

In my Access 97 app (reference set to Microsoft XML, version 2.0):
  Dim xmlDoc As New MSXML.DOMDocument
  Dim xmlHTTP As New MSXML.XMLHTTPRequest
  xmlDoc.async = False

I save an ADO recordset into the xmlDoc, then send it via XMLHTTPRequest.
  Set rst = New ADODB.Recordset
  With rst
    .CursorLocation = adUseClient
    .Open strSQL, conn
    .Save xmlDoc, adPersistXML  'convert the recordset into an XML document
    .Close
  End With

  'send the XML document to it's respective ASP page
  With xmlHTTP_Facility
    .Open "POST", g_strWebServer & "/b1_upload.asp", False, g_strUserName,
g_strPassword
    .setRequestHeader "Content-Type", "text/xml"
    .send xmlDoc_Facility.xml
    'get the response back and see if it was successful
    strResponseFacility = .responseText
  End With

Now to the ASP code:

set xmldoc = Server.CreateObject("Microsoft.XMLDOM")
xmldoc.async = false
xmldoc.load(Request)

At this point I put the XML into an ADO recordset an do my manipulation
there.

HTH,
Dave Carnes

CLIENT SIDE:

Dim sCaminhoServer As String
Dim sXML As String
Dim sGUID As String
Dim oXMLHTTP As MSXML2.XMLHTTP

sCaminhoServer = "http://server_mts/testeXMl/ReceiveXml.asp"
'   cria a instancia para envio via http
Set oXMLHTTP = New MSXML2.XMLHTTP

oXMLHTTP.Open "POST", sServerPath, False
oXMLHTTP.setRequestHeader "encoding", "ISO-8859-1"

oXMLHTTP.send sXML
sGUID = oXMLHTTP.responseText

SERVER SIDE :

set xmldoc = server.CreateObject("Microsoft.XMLDOM")
xmldoc.async = false
xmldoc.load(Request)
set rootNode = xmlDoc.documentElement
nome = rootNode.xml
set stXML= server.createObject("ADODB.Stream")
stXML.Open
stXML.WriteText nome
stXML.Position=0
set rsXML = server.CreateObject("ADODB.Recordset")
rsXML.Open stXML

My code its very close to yours .

Did this code worked well with this caracters or u still have this problem
??

Quote:> Ricc:
> I have recently wrestled with this same issue.  Here are some samples:

> In my Access 97 app (reference set to Microsoft XML, version 2.0):
>   Dim xmlDoc As New MSXML.DOMDocument
>   Dim xmlHTTP As New MSXML.XMLHTTPRequest
>   xmlDoc.async = False

> I save an ADO recordset into the xmlDoc, then send it via XMLHTTPRequest.
>   Set rst = New ADODB.Recordset
>   With rst
>     .CursorLocation = adUseClient
>     .Open strSQL, conn
>     .Save xmlDoc, adPersistXML  'convert the recordset into an XML
document
>     .Close
>   End With

>   'send the XML document to it's respective ASP page
>   With xmlHTTP_Facility
>     .Open "POST", g_strWebServer & "/b1_upload.asp", False, g_strUserName,
> g_strPassword
>     .setRequestHeader "Content-Type", "text/xml"
>     .send xmlDoc_Facility.xml
>     'get the response back and see if it was successful
>     strResponseFacility = .responseText
>   End With

> Now to the ASP code:

> set xmldoc = Server.CreateObject("Microsoft.XMLDOM")
> xmldoc.async = false
> xmldoc.load(Request)

> At this point I put the XML into an ADO recordset an do my manipulation
> there.

> HTH,
> Dave Carnes

Ciao,
Dave