|
|
|||||||||
|
|||||||||
|
|||||||||
| |
||
| ||||||||||||||||||||||||||
![]() |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread | Rate Thread | Display Modes |
|
#1
|
|||
|
|||
|
I get the following problem with an upload script that i received online:
Microsoft VBScript runtime error '800a01f4' Variable is undefined: 'USERNAME' /upload.asp, line 7 Here is the whole script: <%@ Language="VBScript" %> <% Option Explicit %> <!--#INCLUDE FILE="INC_CONFIG.ASP"--> <!--#INCLUDE FILE="DBCONN.ASP"--> <!--#INCLUDE FILE="INC_LNG.ASP"--> <%DIM SHOW USERNAME = REQUEST.COOKIES(USERMANSITENAME&"USER") SET SHOW=SERVER.CREATEOBJECT("ADODB.RECORDSET") SHOW.OPEN "SELECT PICTURE,ISPICTURE FROM USERS WHERE USERNAME = '"&USERNAME&"'", DBCONN, 3, 3%> <HTML> <HEAD> <TITLE>UNLIMITED</TITLE> <STYLE> BODY { SCROLLBAR-HIGHLIGHT-COLOR:#D8C2AD; SCROLLBAR-TRACK-COLOR:#FAFCED; SCROLLBAR-SHADOW-COLOR:#000000; SCROLLBAR-FACE-COLOR:#D8C2AD; SCROLLBAR-3DLIGHT-COLOR:#000000; SCROLLBAR-ARROW-COLOR:#FFFDDD; SCROLLBAR-DARKSHADOW-COLOR:#000000; } .FONT { COLOR: #000080; Helvetica } A { COLOR: #0011CC; } A:HOVER { COLOR: #0000FF } A:VISITED { COLOR: #2D3DAD } A:VISITED:HOVER { COLOR: #0000FF } .INPUT { COLOR: 000080; FONT: 10px Helvetica; BACKGROUND-COLOR: AA89C2; BORDER-RIGHT: 1px solid; BORDER-LEFT: 1px solid; BORDER-TOP: 1px solid; BORDER-BOTTOM: 1px solid } </STYLE> </HEAD> <BODY BGCOLOR="#CCBBAA" TOPMARGIN="0" LEFTMARGIN="0"> <% UPS = REQUEST.QUERYSTRING("UP")%> <%IF UPS = "UP" THEN SET PIC_UPLOAD = SERVER.CREATEOBJECT("aspSmartUpload.SmartUpload") PIC_UPLOAD.UPLOAD For each file In PIC_UPLOAD.Files IF NOT FILE.IsMissing Then IF File.Size > 153000 THEN RESPONSE.WRITE "<CENTER><H2 CLASS=""FONT"">"&UMP_MSG_ANERROROCCURED&"</H2><FONT SIZE=""2"" CLASS=""FONT"">"&UMP_MSG_UPLOADFILESIZE&"<BR><A HREF=""javascript:history.back()"">"&UMP_MSG_GOBACK&"</A></FONT></CENTER>" ELSEIF FILE.FileExt <> "jpg" THEN RESPONSE.WRITE "<CENTER><H2 CLASS=""FONT"">"&UMP_MSG_ANERROROCCURED&"</H2><FONT SIZE=""2"" CLASS=""FONT"">"&UMP_MSG_FILEEXT&"<BR><A HREF=""javascript:history.back()"">"&UMP_MSG_GOBACK&"</A></FONT></CENTER>" ELSE File.SaveAs(USERMANUPLOADPATH & USERNAME&"."&File.FileExt) SHOW.UPDATE SHOW("PICTURE") = USERNAME&"."&File.FileExt SHOW("ISPICTURE") = "True" SHOW.UPDATE RESPONSE.REDIRECT("UPLOAD.ASP?UP=TRUE") END IF ELSE RESPONSE.WRITE "<CENTER><H2 CLASS=""FONT"">"&UMP_MSG_ANERROROCCURED&"</H2><FONT SIZE=""2"" CLASS=""FONT"">"&UMP_MSG_NOTSELECTFILE&"<BR><A HREF=""javascript:history.back()"">"&UMP_MSG_GOBACK&"</A></FONT></CENTER>" End IF NEXT %> <%ELSEIF UPS = "TRUE" THEN%> <CENTER><FONT SIZE="2" CLASS="FONT"><%=UMP_MSG_UPLOADPICSUCESS%><BR><IMG SRC="<%=USERMANUPLOADPATH%><%=SHOW("PICTURE")%>"><BR><A HREF="javascript:window.close()"><%=UMP_MSG_WINCLOSE%></A></FONT></CENTER> <%ELSE%> <center> <H2 CLASS="FONT"><%=UMP_UploadYourPicture%> </H2><FONT SIZE="2" CLASS="FONT"><%=UMP_MSG_PICWARN%> <FORM ACTION="UPLOAD.ASP?UP=UP" METHOD="POST" ENCTYPE="multipart/form-data"> <INPUT TYPE="FILE" NAME="FILE" CLASS="INPUT" SIZE="45"> <INPUT TYPE="SUBMIT" VALUE="<%=UMP_UploadYourPicture%>" CLASS="INPUT"></form> <A HREF="javascript:window.close()"><%=UMP_MSG_WINCLOSE%></A> </CENTER> <%END IF%> Please help me need this file to work for a school project! ![]() |
|
#2
|
||||
|
||||
|
hi and welcome to the forum
as the error says, u need to define the variable USERNAME u have this line in ur code <% Option Explicit %>, because of which u need to define all ur variables. So just define it and the error will go ![]() Also please use code tags while posting code here, select code and press # |
|
#3
|
|||
|
|||
|
Many thanks
Thank you!
Is there any chance we can keep in contact because I want to finish my school project ASAP and i have some problem with CODING ANd i will want someone to pin point my problems Code:
Thank you! Quote:
|
|
#4
|
|||
|
|||
|
Help Needed
CAn someone be at my disposel for 1 day or some hours to help me pin point some coding problem in my school project site!!
Regards, Adonius ![]() |
|
#5
|
||||
|
||||
|
u can ask here only!!
|
|
#6
|
|||
|
|||
|
ok then!
At which hour can i get you so we can brainstorm I`m leaving here to go GYM i`ll be back in about 3 a 4 hour maybe less |
|
#7
|
|||
|
|||
|
I`ll just post an reply when i`m back
Your a miracle i need a good help here so i can finish this school project i`m nealy finished here but i need to upload pics and more on it |
|
#8
|
|||
|
|||
|
Mickey
I`m back ready to start coding! |
|
#9
|
|||
|
|||
|
Defined variable
Have defined variable But still problem
Code:
Server object error 'ASP 0177 : 800401f3' |
|
#10
|
||||
|
||||
|
Quote:
|
|
#11
|
||||
|
||||
|
--thread moved to the classic ASP forum.
|
![]() |
| Viewing: ASP Free Forums > Programming > ASP Development > Other - Asp Problem Upload |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
|
|
|