Internet Security Components - COM, ActiveX and .NET

embedding VBScript in outgoing HTML - WeOnlyDo Discussion board

Back to the forum index

Linear

How do I embed VBScript?

The following code doesn't work, but it is what I would like to do (in Sub Http1_RequestDone, I think):

resp = resp & <SCRIPT LANGUAGE= VBScript > MsgBox Hello World </SCRIPT>

tia

John Baker

locked

2214 views

John,

it doesn't work - in what way? Is this what client receives when page is downloaded, and when you select 'view page source' there?

locked

2277 views

Wow - that was a fast response! Thanks.

I might be asking a dumb question. I am an experienced VB programmer but I'm only just starting with HTML.

At the moment I'm trying to get familiar with using VBScript. I thought I would modify your sample code 2. Simple - manual response.

What I tried to do was use VBScript to add a MessageBox that would pop up as the browser started to display the HTML manually created in your sample. I can do this using Notepad to code a .htm file and then view it with the browser by adding (just after <HTML>):

<SCRIPT LANGUAGE=VBScript>MsgBox Hello World </SCRIPT>

So I changed your sample program to begin

resp = <HTML><SCRIPT LANGUAGE= VBScript >MsgBox Hello World </SCRIPT>
resp = resp & <font face=Verdana size=2>Welcome visitor from

This doesn't look right to me, and VB doesn't like it, but I don't know what to do.

John

locked

2213 views

John,

this code works for me:
[code] resp = <HTML>
resp = resp & <SCRIPT LANGUAGE= VBScript >MsgBox Hello World </SCRIPT>
resp = resp & <font face=Verdana size=2>Welcome visitor from
resp = resp & User.RemoteIP & . This is <b>wodWebServer</b>, version & Http1.Version
resp = resp & <BR>You requested resource & User.Request.Path & User.Request.PageName
resp = resp & </font></HTML> [/code]

locked

2258 views

It works for me too.

Thankyou.

locked

2223 views