MSXML2.ServerXMLHTTP Object

Hi all.

I have this ASP page:


url = "http://www.mypageweb.com/" 

set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") 
xmlhttp.open "GET", url, false 
xmlhttp.send "" 

pagetxt = "<xmp>" & CStr(xmlhttp.ResponseText) & "</xmp>"

myArray = split(pagetxt,"<!--A-->")
part1 = myArray(1)
myArray = split(part1,"<!--B-->")
part2 = myArray(0)

RESPONSE.WRITE part2 & "<br>"
Response.Flush

I need INSERT INTO tbl mysql the result of this page and write:


for i=0 to myArray(0)

strSQL = "INSERT INTO TBL"
strSQL = strSQL & " ( "
strSQL = strSQL & "  quote "
strSQL = strSQL & " )"
strSQL = strSQL & "  VALUES"
strSQL = strSQL & " ( "
strSQL = strSQL & " '" & Replace(part2, "'", "''") & "' "
strSQL = strSQL & " ) "
objconn.execute strSQL

response.write strSQL & "<br>"

next


But I receive this error:

Errore di run-time di Microsoft VBScript error ‘800a000d’
‘[string: " <td width=“21” bac"]’

In the line for i=0 to myArray(0)

Can you help me?

Sorry I wrong Forum… :frowning: