[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

[MacPerl-WebCGI] file upload example ? (2)

sorry, I forgot to post the HTML shell:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"
			"http://www.w3.org/TR/REC-html40/loose.dtd">
<HTML>
<HEAD>
	<TITLE>Digital Uploader</TITLE>
</HEAD>
<BODY bgcolor="#ffffff">
<div align="center">
<h2> Upload Facility</h2>
</div>
<div align="center">
<form action="cgi-bin/upload.cgi" method="post"
enctype="multipart/form-data">
<TABLE BORDER=0 WIDTH=0 CELLSPACING=4 CELLPADDING=4>
	<TR>
		<TD><img src="1x1.gif" width=100 height=10 alt="" border=0></TD>
		<TD><img src="1x1.gif" width=200 height=10 alt="" border=0></TD>
		<TD><img src="1x1.gif" width=100 height=10 alt="" border=0></TD>
	</TR>
	<TR>
		<TD align="right">1)</TD>
		<TD align="left">Please give it a name:</TD>
		<TD align="left"><input type="text" name="filename"></TD>
	</TR>
	<TR>
		<TD align="right">2)</TD>
		<TD align="left">Please choose a file to upload:</TD>
		<TD align="left"><input type="file" name="file"></TD>
	</TR>
	<TR>
		<TD align="right">3)</TD>
		<TD align="left">Do it!</TD>
		<TD align="left"><input type="submit" value="Go!"></TD>
	</TR>
</TABLE></form>
</div>
</BODY>
</HTML>

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-webcgi-request@macperl.org