Hallihallo,
Habe ich eine Chance, beim Abrufen einer Seite Cookies zu "übergeben"?
Sprich: Login-Information
So importiere ich eine Seite:
--- cut ---
function GetUrl(Seite)
MyReq = BasisUrl & Seite
sFile = server.MapPath("import.txt")
Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
objXMLHTTP.Open "get",MyReq,false
objXMLHTTP.Send
set strm1=createobject("adodb.stream")
With strm1
.type = 1
.open
.write objXMLHTTP.responsebody
.savetofile sFile, 2' adSaveCreateOverWrite
.close
End With
Set objFileSys = Server.CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFileSys.OpenTextFile(sFile)
GetUrl = objTextStream.ReadAll
end function
--- cut ---
Stefan.
*** Attachments scanned for malicious content ***
_______________________________________________
Coffeehouse Mailingliste, Postings senden an:
[email protected]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/coffeehouse
