From: Adam R. <ada...@de...> - 2007-10-24 11:13:49
|
I have just adjusted the function signature in SVN so that it returns a = xs:string of an empty sequence. Are you uploading your file using a = multipart POST? Cheers Adam. -----Original Message----- From: exi...@li... on behalf of Winston Sent: Wed 24/10/2007 00:47 To: exi...@li... Subject: [Exist-open] Re naming uploaded file =20 Hi, quick question here...I am trying to rename a file (an image file) uploaded from an html form via POST, but I can't identify the uploaded = files extension because the function request:get-uploaded-file-name does not return a string so I can't tokenize it and pull out the extension with fn:tokenize($filename,'.') I don't understand how to do this... Here = is my xquery xquery version "1.0"; declare namespace request=3D"http://exist-db.org/xquery/request"; declare namespace session=3D"http://exist-db.org/xquery/session"; declare namespace util=3D"http://exist-db.org/xquery/util"; declare option exist:serialize "method=3Dxhtml omit-xml-declaration=3Dno indent=3Dyes encoding=3DUTF-8 doctype-public=3D-//W3C//DTD=A0XHTML=A01.0=A0Transitional//EN =20 doctype-system=3Dhttp://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"= ; =09 declare function local:namefile() { =20 let $filename :=3D request:get-uploaded-file-name("uploadedfile") (: NOTE: THIS TOKENIZE DOESNT WORK BECAUSE THE ABOVE FUNCTION DOESN'T RETURN A STRING :) let $sequence :=3D fn:tokenize($filename,'.') let $fileextension :=3D $sequence[last()] let $userid :=3D request:get-parameter("userid", "null") let $useridmedialocation :=3D concat("xmldb:exist:///db/usermedia/", $userid) let $newname :=3D concat($userid,'_',fn:count(collection($useridmedialocation)/node()),'.',= $fileextension) return ( $newname ) }; =09 let $userid :=3D request:get-parameter("userid", "null") let $file :=3D request:get-uploaded-file("uploadedfile") let $string :=3D concat("xmldb:exist:///db/usermedia/", $userid) let $profilemedia :=3D xmldb:collection($string,'potorb','c0c0nut') return <div>{xmldb:store($templocation, local:namefile(), $file)}</div> sent from this html form: <form enctype=3D"multipart/form-data" action=3D"../xquery/upload.xql" method=3D"POST"> <input type=3D"hidden" name=3D"userid" value=3D"{@userid}" /> <input type=3D"hidden" name=3D"MAX_FILE_SIZE" value=3D"10000000" /> Choose a file to upload: <input name=3D"uploadedfile" type=3D"file" = /><br /> <div id=3D"status" style=3D"text-align:center;font-size:1.3em;color:#ffffff;">none</div> <input class=3D"button" name=3D"submit" type=3D"submit" value=3D"Upload = File" /> </form> --=20 View this message in context: = http://www.nabble.com/Renaming-uploaded-file-tf4681094.html#a13376212 Sent from the exist-open mailing list archive at Nabble.com. -------------------------------------------------------------------------= This SF.net email is sponsored by: Splunk Inc. Still grepping through log files to find problems? Stop. Now Search log events and configuration files using AJAX and a browser. Download your FREE copy of Splunk now >> http://get.splunk.com/ _______________________________________________ Exist-open mailing list Exi...@li... https://lists.sourceforge.net/lists/listinfo/exist-open |