Document Elements?

mattscotney · Sep 18, 2002

Hi everyone,

How can I access "document.documentElement"'s from a page using asp?

Thanks in advance,
Matt Scotney

Tarwn · Sep 19, 2002

XML DocumentElements or page documentElements?
If you could provide us with a starting place (like your variable initializations and object instantiation) we could give you some specific advice or help on this.
-Tarwn "Customer Support is an art not a service" - marketing saying
"So are most other forms of torture" - programmers response
(The Wiz Biz - Rick Cook)

mattscotney · Sep 19, 2002

Tarwin,

I am trying to access page document elements such as document.documentElement.innerHTML from a regular html page using ASP.

EXAMPLE:
A user enters a url into a input text box, through asp the page is loaded into a new window. I need to extract the document.documentElement.innerHTML from the page I have loaded into the new window.

Currently I can generate the page in the new window using the InetCtls.Inet or Microsoft.XMLHTTP but both objects do not give me access to the innerHTML element. I can also generate the source of the page once it is loaded and display it, however I need an object which can access the document.documentElement.innerHTML.

I can also generate the new page using ASP and by adding a onLoad event to the page generated, run a Javascript function to generate the innerHTML with the following code:
function show()
{
z = window;
z.document.write(header + '<pre>' + repl('<HTML>\n' + document.documentElement.innerHTML + '\n</HTML>'));
z.document.close();
}

function repl(x)
{
x=x.replace(/&/g,'&');
x=x.replace(/>/g,'>');
x=x.replace(/</g,'<');
return x;
}

However I would prefer to do the whole process server side with ASP. Any ideas?

Thanks,
Matt Scotney

Tarwn · Sep 19, 2002

Your only option would be to parse out the tags you wish to manipulate and make changes using concatenated substrings of the the whole page to the left of the tag and the whole page to the right of the tag with your addition in the middle.
ASP can't manipulate HTML document elements because it is a server-side script and generally is generating the html on the fly, so it did not seem like it needed to access any kind of document object model.
Your two options are using javascript above and the following parsing in ASP:
1) Define a function that accepts a beginTag, and endTag, and a newContent string
2) Using InStr(contentString,beginTag)+len(beginTag) as your starting position, get the left side of the contentString and store it in a variable. Do the same for the right side. Now you can concatenate leftSide & newContent & rightSide to create a new "innerhtml" between the tags.
or if you simple want the contents between the tags you can use the same method, just return the text between beginTag and endTag using InStr to get their positions and mid to get the charact string between the positions.
-Tarwn "Customer Support is an art not a service" - marketing saying
"So are most other forms of torture" - programmers response
(The Wiz Biz - Rick Cook)

mattscotney · Sep 19, 2002

Tarwin,

Firstly thanks for your help in this matter. I will show you what I have produced so far, if you can work out a way to do the whole process server side it would be wonderful, however from your previous answer I doubt it can be done?

Name this file dSource.htm. This is the file which the user enters the url (file to run in the browser):

<HTML>
<HEAD>
<title>SOURCE</title>
</HEAD>
<BODY>

<P Align = "center"><B>

<form name ="userTxt" method="post" action="dSource.asp" target="dSource">
URL:
<input type=text name=txtURL value="

http://ultimate-ebook.full-resale-rights.com/order.html"

size ="40">
<input type=submit value="REVEAL SOURCE"">

</form>
</B></P>
</BODY>
</HTML>

Name the next file dSource.asp:
<%@ LANGUAGE="vbScript" %>

<HTML>
<HEAD>
<SCRIPT language="JavaScript" src="dSource.js"></SCRIPT>
</HEAD>
<BODY onload ="show()">

<%

function getText()

Dim ipADD, userIN, inet, strHTML, sesArray(2)

userIN = trim(Request("txtURL&quot

)
ipADD = Request.ServerVariables("REMOTE_ADDR&quot

response.write "<B><FONT COLOR = RED>PLEASE WAIT - GENERATING DECRYPTED SOURCE.......</FONT></B><HR>"
response.write "<FORM NAME=""tempFORM""><INPUT Type=""hidden"" Name=""userIN"" Value=""" + userIN + """>"
response.write "<INPUT Type=""hidden"" Name=""ipADD"" value=""" + ipADD + """></FORM>"

set inet = CreateObject("InetCtls.Inet&quot

inet.requesttimeout = 60 'in seconds
inet.URL = userIN

logREQUEST userIN, ipADD

strHTML = inet.OpenURL
getText = strHTML

end function

sub logREQUEST(url, ip)

Dim logFSO, Writelog

Set logFSO = Server.CreateObject("Scripting.FileSystemObject&quot

Set Writelog = logFSO.OpenTextFile("D:\Abyss Web Server\htdocs\Spider\log.txt", 8, True)

Writelog.WriteLine(Now & " - " & ip & " - " & url)
Writelog.Close

SET Writelog = NOTHING
SET logFSO = NOTHING

end sub

%>

<%=getText%>

The next file should be named dSource.js:
function show()
{

url = document.tempFORM.userIN.value;
ip = document.tempFORM.ipADD.value;

header = "<B><font color = red>YOUR DECRYPTED SOURCE CODE HAS BEEN GENERATED BELOW:</font></B><BR>";
header = header + "<B>Your details have been logged. Any abuse of this service will be reported.<BR>";
header = header + "The URL you requested: <a href = " + url + ">" + url + "</A><BR>";
header = header + "Your IP address: " + ip + "</B><HR>";

z = window;
z.document.write(header + '<pre>' + repl('<HTML>\n' + document.documentElement.innerHTML + '\n</HTML>'));
z.document.close();
}

function repl(x)
{
x=x.replace(/&/g,'&');
x=x.replace(/>/g,'>');
x=x.replace(/</g,'<');
return x;
}

The final document is the log.txt file, which logs the users input. Simply create a blank log.txt file and change the directory to match where it is stored in dSource.asp (Set Writelog = logFSO.OpenTextFile("'your location'\log.txt", 8, True)

I would really like to do the whole process server side (apart from dSource.htm). Please test out the above files and advise if it can be done?

Note: all files need to be stored in the same directory and run on from a web server. The first file to run is dSource.htm. eg

http://localhost/dSource.htm)

Thanks for your help,
Matt Scotney

mattscotney · Sep 19, 2002

Tarwin,

One thing I forgot to mention was that if you type into your browser:

http://ultimate-ebook.full-resale-rights.com/order.html

you will notice that the source is encrypted / obfuscated, if you run that url through dSource.html ( default input text value) it will reveal the generated source (innerHTML) both the decrypted / obfuscated html and the unencrypted / de-obfuscated html source code.

BACKGROUND:
I have written a VB app which encrypts the source code of a page. The page decrypted / obfuscated with my program does not decrypt with the dSource.htm I have provided. I want to show potential sales that my VB program can not be decrypted easily while others can.

Thanks again,
Matt Scotney

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Document Elements?

mattscotney

Programmer

Tarwn

Programmer

mattscotney

Programmer

Tarwn

Programmer

mattscotney

Programmer

mattscotney

Programmer

Similar threads

Part and Inventory Search

Sponsor