Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > ASP.NET and ASP > ASP 3 Classic ASP Active Server Pages 3.0 > Classic ASP Basics
Password Reminder
Register
| FAQ | Members List | Search | Today's Posts | Mark Forums Read
Classic ASP Basics For beginner programmers starting with "classic" ASP 3, pre-".NET." NOT for ASP.NET 1.0, 1.1, or 2.0
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Classic ASP Basics section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
DRM-free e-books 300x50
Reply
 
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old August 11th, 2008, 10:47 AM
Registered User
 
Join Date: Oct 2005
Location: Rockville, MD, USA.
Posts: 6
Thanks: 0
Thanked 0 Times in 0 Posts
Default How to change ASP variable in VBScript

Hi Friends,

I created an asp file with some variables.
I declare status variable and assigned a default value.
Dim STO
STO ="Online"

I want to change STO in VA script logevent procedure.

I am trying to use set as <% set STO = "new value" %>

It does not work.

Every Experts, How to change ASP variable in VBScript?

Thanks,


New web person

**********source code***********
<%@ Language=VBScript %>
<html>
<head>
<title>TEST
</title>
</head>
<body bgcolor="white" >

<%
Dim GUIPar
Dim GUIPar2
Dim STO
STO ="Online"
GUIPar = Request.QueryString("para1")

response.write "<center><b>Status :</b>"&STO&"&nbsp&nbsp;"&now()&"<br></center>"
GUIPar ="00000001"
if cstr(GUIPar) ="" or IsNull( GUIPar ) then
Response.Redirect "http://localhost/error1.asp"
end if
%>

<center>
<p>xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

<script Language="VBScript">

Proxy.CreateInstance
dim GUID
dim objCurrentEntity
dim x
x =0

GUID = "{<%=GUIPar%>}"


Sub Proxy_OnLogon
    im st
    MsgBox "Successful Logon"
   st = Proxy.IsLoggedOn

if st = False then

   <% set STO = "Offline Service" %>
end if


End Sub

</script>
</body>
</html>

jimusa
Reply With Quote
  #2 (permalink)  
Old August 13th, 2008, 07:08 PM
Friend of Wrox
Points: 6,664, Level: 34
Points: 6,664, Level: 34 Points: 6,664, Level: 34 Points: 6,664, Level: 34
Activity: 0%
Activity: 0% Activity: 0% Activity: 0%
 
Join Date: Jan 2004
Location: Sydney, NSW, Australia.
Posts: 1,870
Thanks: 12
Thanked 20 Times in 20 Posts
Send a message via AIM to mat41
Default

The 'Set' is not neccesary. Change:

set STO = "new value"

To:

STO = "new value"

Wind is your friend
Matt
www.elitemarquees.com.au
Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Change MsgBox title from VBScript to custom crmpicco VBScript 3 May 15th, 2008 07:56 PM
VBScript to change target of Iframe dartcoach BOOK: ASP.NET 2.0 Website Programming Problem Design Solution ISBN: 978-0-7645-8464-0 2 May 9th, 2008 11:45 AM
vbscript + xsl:variable lscjtw XSLT 9 August 2nd, 2007 11:44 AM



All times are GMT -4. The time now is 02:45 AM.


Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.