perl-asp mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Josh Chamas <j...@chamas.com>
Subject Re: Apache::ASP on Windows
Date Sun, 18 Jan 2004 02:15:22 GMT
Hi Chris,

It looks like you were trying to run VBScript here.  Apache::ASP only support
Perl scripting currently.  Please see

   http://www.apache-asp.org/faq.html#VBScript%20or%2007fa600d

for some alternatives that might work for you.

Regards,

Josh
________________________________________________________________
Josh Chamas, Founder                   phone:925-552-0128
Chamas Enterprises Inc.                http://www.chamas.com
NodeWorks Link Checker                 http://www.nodeworks.com



Chris Purcell wrote:
> Apache/2.0.44 (Win32) mod_perl/1.99_08 Perl/v5.8.0
> Installed from http://www.indigostar.com/indigoperl.htm.
> 
> I'm trying to get an ASP page to run in Apache on a Windows server.  I can
> run the hello.asp test script fine, but when I try to launch this ASP page
> I want to execute I get the following error in the error.log file.  I
> don't know anything about ASP and have no clue what this means....
> 
> 
> [Mon Jan 12 15:00:34 2004] [error] [asp] [2728] [error] errors compiling
> global.asa: Bad name after true' at
> E:/Apache2/apache/htdocs/wwwroot//./global.asa line 15. <--> 	eval ' <-->
> #line 1 E:/Apache2/apache/htdocs/wwwroot//./global.asa <--> package
> Apache::ASP::Compiles::__ASP_E__Apache2_apache_htdocs_wwwroot__x; ;; no
> strict ;; use vars qw($Application $Session $Response $Server $Request);
> ;; use lib qw(E:/Apache2/apache/htdocs/wwwroot//.); ;;  <--> \' Version:
> 20030620-8.0.1.5 <--> Sub Application_onStart() <-->
> 	Application("MSEC_QUAR_Path") = "" <--> End Sub <--> Sub
> Application_onEnd() <--> End Sub <--> Sub Session_onStart() <--> 	on
error
> resume next <--> 	 <--> 	Session("ERROR_STRING") = ""		\' Holds string
> describing errors that occurred during session initialization. <-->
> 	Session("ERRORS") = "false"			\' Set to \'true\' if any errors occurred
> during session initialization. <--> 	 <--> 	Session("VIEW_SELECTED") = ""
> <--> 	Session("QMC_OPENED") = "false" <--> 	 <--> 	Set Session("QMCWrap")
> = Server.CreateObject("QMCWrap.QMCConnection")	\' create object of type
> QMCConnection <--> 	 <--> 	if Err.number <> 0 then <-->
> 		Session("ERROR_STRING") = Session("ERROR_STRING") & " [0x" &
> hex(err.number) & "]<br>" <--> 		Session("ERRORS") = "true" <-->
> 		Err.Clear <--> 	end if <--> 	 <--> 	if (Session("ERRORS") = "false")
> then <--> 		Dim aGIDs()	\' Array of message IDs processed in some way.
> Cleared on refreshing of QMC. <--> 		Dim aIIDs()	\' Array of item IDs
> processed in some way. Cleared on refreshing of QMC. <--> 		ReDim preserve
> aGIDs(1) <--> 		ReDim preserve aIIDs(1) <--> 		aGIDs(1) = 0 <-->
> 		aIIDs(1) = 0 <--> 		Session("aGIDs") = aGIDs <--> 		Session("aIIDs") =
> aIIDs <--> 	 <--> 		Session("QMCWrap").OpenQdriver() <--> 	 <-->
		if
> Err.number <> 0 then <--> 			Session("ERROR_STRING") =
> Session("ERROR_STRING") & " [0x" & hex(err.number) & "]<br>" <-->
> 			Session("ERRORS") = "true" <--> 			Err.Clear <--> 		end if <-->
		 <-->
> 		if (Session("ERRORS") = "false") then <--> 			Set oXFile =
> Server.CreateObject("GFIFile.XFile") <--> 	 <--> 			if Err.number <>
0
> then <--> 				Session("ERROR_STRING") = Session("ERROR_STRING") & " [0x" &
> hex(err.number) & "]<br>" <--> 				Session("ERRORS") = "true" <-->
> 				Err.Clear <--> 			end if <--> 	 <--> 			if (Session("ERRORS") =
> "false") then <--> 				TempUserName =
> Request.ServerVariables("LOGON_USER") <--> 				Session("RAND_KEY") =
> oXFile.GetRandSequence(TempUserName) <--> 	 <--> 				if Err.number <>
0
> then <--> 					Session("ERROR_STRING") = Session("ERROR_STRING") & " [0x"
> & hex(err.number) & "]<br>" & Request.ServerVariables("LOGON_USER")
<-->
> 					Session("ERRORS") = "true" <--> 					Err.Clear <--> 				end if <-->
	
> <--> 				Set oXFile = nothing <--> 			end if <--> 		end if <-->
	end if
> <--> 	 <--> 	on error goto 0 <--> End Sub <--> Sub Session_onEnd()
<-->
> 	Session("QMCWrap").CloseQdriver() <--> 	Set Session("QMCWrap") = nothing
> <--> End Sub <-->  ;; sub exit { $main::Response->End(); }  ;; no lib
> qw(E:/Apache2/apache/htdocs/wwwroot//.); ;; 1;' called at
> E:/Apache2/perl/site/lib/Apache/ASP/GlobalASA.pm line 124 <-->
> 	Apache::ASP::GlobalASA::new('Apache::ASP=HASH(0x10e65a4)') called at
> E:/Apache2/perl/site/lib/Apache/ASP.pm line 382 <-->
> 	Apache::ASP::new('Apache::ASP','Apache::RequestRec=SCALAR(0x7c7268)','E:/Apache2/apache/htdocs/wwwroot/main.asp')
> called at E:/Apache2/perl/site/lib/Apache/ASP.pm line 181 <-->
> 	Apache::ASP::handler('Apache::RequestRec=SCALAR(0x7c7268)') called at
> E:/Apache2/apache/htdocs/wwwroot//./global.asa line 15 <--> 	eval {...}
> called at E:/Apache2/apache/htdocs/wwwroot//./global.asa line 15 <--> ,
> E:/Apache2/perl/site/lib/Apache/ASP.pm line 1714
> 
> 
> 
> 
> Any idea's what this means?
> 
> Thanks,
> Chris
> 
> 
> 
> 
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: asp-unsubscribe@perl.apache.org
> For additional commands, e-mail: asp-help@perl.apache.org
> 
> 


---------------------------------------------------------------------
To unsubscribe, e-mail: asp-unsubscribe@perl.apache.org
For additional commands, e-mail: asp-help@perl.apache.org


Mime
View raw message