Re: [webmin-devel] Example of using ui_upload?

[Jeffrey K. <je...@np...>]

Hmm. ReadParseMime() is giving me a "Error - Missing Headers".  Im sure Im
doing something stupid but I've been over it 3 times.

This is my submit code (pardon the commented out lines pls):

#!/opt/local/bin/perl

require 'nphos-lib.pl';

#my $bodyTags=
"onLoad=window.setTimeout('window.location.reload()',10*1000);";
ui_print_header('RedDwarf Deployment Directory', 'NPHOS',
'',undef,0,0,0,undef,u
ndef,$bodyTags,undef);
#print ui_form_start('delete_deployed.cgi','post');
#print ui_columns_start(["Select","File name"]);
#my @filenames = list_directory("/opt/local/reddwarf/10.2.1/deploy");
#foreach $filename (@filenames){
#   ui_checked_columns_row($filename,undef,'file_select_check',$filename);
#}
#print ui_columns_end();
#print ui_form_end([[undef,"Delete checked files"]]);
#print ui_hr();
#print ui_subheading('File Upload');
print ui_form_start("upload_deployed.cgi","form-data");
print ui_upload("upload_file");
print ui_form_end([["ok","Upload file"]]);
ui_print_footer(undef,"NPHOS Platform page");


And this is upload_deployed.cgi:

#!/opt/local/bin/perl

require 'nphos-lib.pl';

ReadParseMime();
#my $filename = $in{'filename'};
#open(FILE, "/opt/local/reddwarf/10.2.1/deploy/$filename");
#print FILE $in{'upload_file'};
#close(FILE);


On Wed, Jan 12, 2011 at 10:03 AM, Jeffrey Kesselman <je...@np...>wrote:

> One more stupid Q sorry, how do I fetch the name of the uploaded file?  Is
> it another key on $in?
>
> On Tue, Jan 11, 2011 at 11:09 PM, Jamie Cameron <jca...@we...>wrote:
>
>> On 11/Jan/2011 19:22 Jeffrey Kesselman <je...@np...> wrote ..
>> > I want to only allow my users to upload and delte fiels from specific
>> > directories so I am building my own file management interface.
>> >
>> > Is there a minimal working example of both setting up the ui_upload
>> > interface and handling the resulting form-data?
>> >
>> > Its all a bit greek to me right at the moment...
>>
>> The code for the form would be like :
>>
>> print ui_form_start("upload.cgi", "form-data");
>> print "Choose a file : ",ui_upload("file");
>> print ui_form_end([ [ "ok", "Upload" ] ]);
>>
>> And for the parser upload.cgi :
>>
>> ReadParseMime();
>> open(FILE, ">/path/to/destfile");
>> print FILE $in{'file'};
>> close(FILE);
>>
>>  - Jamie
>>
>>
>> ------------------------------------------------------------------------------
>> Protect Your Site and Customers from Malware Attacks
>> Learn about various malware tactics and how to avoid them. Understand
>> malware threats, the impact they can have on your business, and how you
>> can protect your company and customers by using code signing.
>> http://p.sf.net/sfu/oracle-sfdevnl
>> -
>> Forwarded by the Webmin development list at web...@we...
>> To remove yourself from this list, go to
>> http://lists.sourceforge.net/lists/listinfo/webadmin-devel
>>
>
>