File Upload

[DOntquIT]

Hi all,

<form action=" <%a5 ? request.script_name %> " method="post" enctype="multipart/form-data">&nbsp;
<input type="file" name="FileToUpload" style="WIDTH: 342px; HEIGHT: 22px" size=28><br>
<input type="submit" name="cmd" value="Upload Cust Visit Report" style="WIDTH: 182px; HEIGHT: 24px" size=16>

</form>

<%a5

dim msg as c = ""
dim oldfile as c
dim newfile as c


if eval_valid("cmd")

file.from_blob("C:\A5Webroot\CustomerReport\\" + FileToUpload.filename, FileToUpload.data)
msg = "<a href=\customerreport\"/" + FileToUpload.filename + "\" target=\"_blank\">" + FileToUpload.filename + "</a> was uploaded<br /><br />"

end if

%>

Am using the above code for file upload.
i have a webpage with two components.
first component is dialog with dropdown and based on the DDL value my second component (GRID) will populate.
im having file upload in between this two components.

once i select a value in DDL, my grid will be populatd based on that value.now when i select upload a file my page getting refresh since am using request.script_name.
becase of that event my DDL set back to its default value and my grid doesnt have any value..

can i pass arguments to page along with request.script_name?

[DOntquIT]

Re: File Upload

Please refer to this attachment for above mentioned page

[DOntquIT]

Re: File Upload

Yes its done.by just adding one hidden control in HTML with name as the parameter :)

How can i rename the file while uploading.im using the following code to do that.
<%a5
dim msg as c = ""
dim oldfile as c
dim newfile as c
if eval_valid("cmd")
newfile = recno + FileToUpload.filename
file.from_blob("C:\A5Webroot\CustomerReport\\" + newfile, FileToUpload.data)
msg = "<a href=\customerreport\"/" + newfile + "\" target=\"_blank\">" + newfile + "</a> was uploaded<br /><br />"
end if
%>
but im getting this error,
Error:Script: /LivePreview/cvreport.a5w line:80
file.from_blob("C:\A5Webroot\CustomerReport\\" + newfile, FileToUpload.data)
The filename, directory name, or volume label syntax is incorrect.
C:\A5Webroot\CustomerReport\1382 myfile.txt"

Does anyone can help me to rename file while upload?

[NoeticCC]

Re: File Upload

Don't try anything like this in the live preview, for starters.

If you want to rename a file, file.rename() might be a start... read up on functions in the online help, there's plenty of info in there :)

[DOntquIT]

Re: File Upload

Don't try anything like this in the live preview, for starters.

If you want to rename a file, file.rename() might be a start... read up on functions in the online help, there's plenty of info in there :)

Thanks Andrea,

i have this idea before, then i thought to try direct renaming first.it doesnt work out anyway.
will try with file.rename :)

<%a5
dim msg as c = ""
dim oldfile as c
dim newfile as c
if eval_valid("cmd")
file.from_blob("C:\A5Webroot\CustomerReport\\" + FileToUpload.filename, FileToUpload.data)
msg = "<a href=\customerreport\"/" + FileToUpload.filename + "\" target=\"_blank\">" + FileToUpload.filename + "</a> was uploaded<br /><br />"
oldfile = "C:\A5Webroot\CustomerReport\\" + FileToUpload.filename
newfile = "C:\A5Webroot\CustomerReport\\" +"customer" + FileToUpload.filename
file.rename(oldfile,newfile)
end if
%>
when i use text directly in this statement
newfile = "C:\A5Webroot\CustomerReport\\" +"customer" + FileToUpload.filename

my file renamed properly as customermyfile.txt
but when i use variable here
newfile = "C:\A5Webroot\CustomerReport\\" + customer + FileToUpload.filename
its showing me the same error message as before.


My complete code:
<input type="hidden" value="<%a5 ? btnum %>" name="btnum"></input>
<%a5
dim msg as c = ""
dim oldfile as c
dim newfile as c
dim customer as c
if eval_valid("btnum")
customer = eval("btnum")
if eval_valid("cmd")
file.from_blob("C:\A5Webroot\CustomerReport\\" + FileToUpload.filename, FileToUpload.data)
msg = "<a href=\customerreport\"/" + FileToUpload.filename + "\" target=\"_blank\">" + FileToUpload.filename + "</a> was uploaded<br /><br />"
oldfile = "C:\A5Webroot\CustomerReport\\" + FileToUpload.filename
newfile = "C:\A5Webroot\CustomerReport\\" + customer + FileToUpload.filename
file.rename(oldfile,newfile)
end if
end if
%>


500 Internal Server Error
"Script Error
Error:Script: /LivePreview/hrmis_btcv_cvreport.a5w line:87
file.rename(oldfile,newfile)
The filename, directory name, or volume label syntax is incorrect.
C:\A5Webroot\CustomerReport\1382 021108.txt"

1382 is customer
021108.txt is file name
Bare with me for simple questions.Nothing turn up right for me today. :(

[Steve Wood]

Re: File Upload

Put this debug code in the appropriate place to determine the values for your vars:

save_to_file(oldfile,"c:\test1.txt")
save_to_file(newfile,"c:\test2.txt")

See if what you get in the txt files match what you are attempting to do. Will your OS allow you to save files with embedded spaces? Your newfile does have an embedded space.

[DOntquIT]

Re: File Upload

Will your OS allow you to save files with embedded spaces? Your newfile does have an embedded space.

Yes this is the problem.once i remove the space now can upload.
Thanks steve

[DOntquIT]

Re: File Upload

Back again!

In server webroot folder i have a folder named customer report and inside the folder im renaming all the customer uploaded report with id and report extension.
Eg:
when i upload a report named,Alphacustomerreport.doc
am renaming it as 1234.doc

that 1234 is some ID related to customer.
once the upload done and page is ready to view, when user click the attached file
im providing link as

<a href="\Customerreport\">Attachment View</a> </p>
\Customerreport\ here i can get that customer id 1234 and pass it in link..but wonder how to pass as 1234.doc along wit extension

is there a way that i can able to view attached file by jus passing filename without extension , as how our OS search for file by jus giving part of file name.
i can achieve this by storing in Databse, just trying to avoid it.

Thanks for any help