Hello:
I creating a txt file into my local drive. My code is the following:
<%
dim filesys, filetxt, Strinfo
Strinfo= Request.QueryString("qStr"
Response.Write(StrInfo)
Const ForReading= 1, ForWriting=2, ForAppending=8
Set filesys=CreateObject("Scripting.FileSystemObject"
Set filetxt=filesys.OpenTextFile("c:\$garra\mitexto.txt",ForAppending,True)
filetxt.WriteLine(qStr)
filetxt.Close
%>
Where qStr contains this string: ?ReferenceNumber=7&AICC_TRACKING=/learningspace5/tracking/hacp/&AICC_SID=616313237-6900&AICC_URL=http%3A%2F%2Felearnla.ihost.com%2FLearningSpace5%2FProgram%2FScripts%2FTrack.asp
My big problem is when I read the txt file created into my local, the value of qStr has been writen until "?ReferenceNumber=7" but I need the rest of the string to pass the correct value.
I suppose I have to split the string into several strings but I don´t know how to do it.
Hope you can help me.
Thanks in advance.
Liliana
I creating a txt file into my local drive. My code is the following:
<%
dim filesys, filetxt, Strinfo
Strinfo= Request.QueryString("qStr"
Response.Write(StrInfo)
Const ForReading= 1, ForWriting=2, ForAppending=8
Set filesys=CreateObject("Scripting.FileSystemObject"
Set filetxt=filesys.OpenTextFile("c:\$garra\mitexto.txt",ForAppending,True)
filetxt.WriteLine(qStr)
filetxt.Close
%>
Where qStr contains this string: ?ReferenceNumber=7&AICC_TRACKING=/learningspace5/tracking/hacp/&AICC_SID=616313237-6900&AICC_URL=http%3A%2F%2Felearnla.ihost.com%2FLearningSpace5%2FProgram%2FScripts%2FTrack.asp
My big problem is when I read the txt file created into my local, the value of qStr has been writen until "?ReferenceNumber=7" but I need the rest of the string to pass the correct value.
I suppose I have to split the string into several strings but I don´t know how to do it.
Hope you can help me.
Thanks in advance.
Liliana