Below is the code provided.
I have narrowed the error not allowing me to make other normal Dreamweaver connections to the code :
" if redirecturl <> "" then
response.redirect redirecturl
end if
response.end
"
but I don't know how to fix it.
____________________________
<OBJECT RUNAT=Server SCOPE=Session ID=MyInfo PROGID="MSWC.MyInfo">
</OBJECT><SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
app_location="aspre"
' figure out who's coming in and where they belong
session("url")=request.servervariables("URL")&"?"& request.servervariables("QUERY_STRING")
if instr(session("url"),"distrib")>0 then
login_status="distributor"
elseif instr(session("url"),"purchaser")>0 then
login_status="purchaser"
elseif instr(session("url"),"cart_func")>0 then
session("startshopping")=true
elseif instr(session("url"),"admin")>0 then
login_status="administrator"
elseif instr(session("url"),"cron.asp")>0 then
cron = true
else
login_status="index"
end if
if login_status="index" then
redirecturl=cstr(Application("serverpath")&"defaul t.asp")
elseif cron then
redirecturl = ""
elseif login_status="distributor" or login_status="purchaser" then
redirecturl=cstr(Application("serverpath")&login_s tatus&"-login.asp")
else
redirecturl=session("url")
end if
Application("connectstring") = "DRIVER={SQL Server};SERVER=server;database=test;dsn=test;uid=t est;pwd=test"
Application("server")="http://www.test.com"
Application("serverpath") = "http://www.test.com/auction/"
Application("fromaddr") = "
[email protected]"
Application("cronnotify") = "
[email protected]"
' get admin email in functions.asp
'Application("adminemail") = "
[email protected]"
Session("timeout") = 600
if redirecturl <> "" then
response.redirect redirecturl
end if
response.end
end if
End sub
Sub Session_OnEnd
response.write "Sorry, your session has expired!"
End sub
</SCRIPT>