Welcome to WebmasterWorld Guest from

Forum Moderators: ocean10000

Message Too Old, No Replies

Simple read from site




10:39 pm on May 10, 2006 (gmt 0)

10+ Year Member

I do not know ASP but I found part of the code at [asptutorial.info...] and using my patchy visual basic skills I have tried to modify it to make it work.
What it is supposed to do is read the data from a page and output it, after you have sent the appropriate GET variables. I need someone to check this will work, as I am not using it but its just an example to help people on my site:


dim user, auth, length, type, url, contents

' Your User ID
user = "123"

' Your Auth Code
auth = "28F21DZ"

' Length
length = "32"

' Type
type = "1"

' Create the url
url = "http://www.site.com/?user=" & user & "&auth=" & auth & "&length=" & length & "&type=" & type

' Query page
Set GetConnection = CreateObject("Microsoft.XMLHTTP")
GetConnection.Open "get", url, False
contents = GetConnection.responseText
Set GetConnection = Nothing

' Check for errors
If (InStr(contents, "error") > 0) Then
response.write("There was an error generating your data!")

' Output serial key
response.write("Thank you, your data is: " & contents)
End If


If there are any errors please let me know! Also are there any better ways to improve this? Finally can anyone provide a .NET version of this?


12:28 pm on May 11, 2006 (gmt 0)

5+ Year Member

Can't check you code right now but I use this regularly:

Response.Buffer = True
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", "http://www.domain.com/", False


4:27 pm on May 11, 2006 (gmt 0)

10+ Year Member

Yeh I have similar but I think the way to pass GET values is wrong in my script as I am putting them in the url?


11:38 pm on May 19, 2006 (gmt 0)

10+ Year Member

Can any1 help?


11:43 pm on May 19, 2006 (gmt 0)

WebmasterWorld Senior Member 10+ Year Member

A quick thought - the MSXML dll expects a valid XML document (and most webpages aren't). Perhaps try the WINHTTP component?


11:49 pm on May 19, 2006 (gmt 0)

10+ Year Member

Can you show me an example? And how do I pass GET values to a url?


4:00 am on May 20, 2006 (gmt 0)

10+ Year Member

Try this:
Set objWinHttp = Server.CreateObject("WinHttp.WinHttpRequest.5")
objWinHttp.Open "GET", url
strHTML = objWinHttp.ResponseText
Set objWinHttp = Nothing

Featured Threads

Hot Threads This Week

Hot Threads This Month