File Upload Feature pack

[lgrupido]

I have the file upload feature pack.

The problem is that there is no "upload folder" option in the file upload - user defined action.

So, I can't specify where I want the file to upload to.

It seems to automatically go to the webroot, but, though I don't get any errors, the file doesn't actually upload to there.

The after server event fires just fine, and gives me valid data which I can put into my database.

So, the two problems are: No Upload folder, and the file doesn't get placed where it should.

Suggestions?

[lgrupido]

Re: File Upload Feature pack

BTW, I am using an older version of Alpha5 - 10.5 - 3674. Is that my real problem?

(Unfortunately, moving forward breaks certain features in my app. I was waiting for V11 to do it all at once. Maybe it's time to bit the bullet!)

[lgrupido]

Re: File Upload Feature pack

OK, I moved up to the latest patch of Alpha 5 (V10). Still no joy - I do not have an upload folder option in my File upload feature pack settings. The option is shown in the online instruction video.

[Clipper87]

Re: File Upload Feature pack

The "file upload - user defined" expects an xbasic function to handle the uploaded files. Why don't you use the "file upload" ?

[lgrupido]

Re: File Upload Feature pack

I just figured this out last night. I want to do multiple uploads so I need to use the user-defined.

I sent a bug message to Selwyn and he straightened me out.

The training video and the template show different options than are actually available so that threw me off. I think I've got it now.

[canc]

Re: File Upload Feature pack

HI, I have the same problem using this...

please would you be able to post the solution?

Thanks

Miles

[lgrupido]

Re: File Upload Feature pack

From the after_upload function you have access to two variables:

e.uploadFolder
e.uploadFolderFullyQualified

You don't really get to set those variables to anything - they default to the webroot folder.

You can use them or not.

You can save the file to wherever you want using the command

file.From_blob(e.fileArray[i].fileName, e.filearray[i].data)

With the from_blob command, you can add a directory (whatever directory you want) to the front of the filename and save it there.

for instance, I have one that looks like this:

file.From_blob(e.uploadFolderFullyQualified + chr(92) + "trips" + chr(92) + directory + chr(92) + e.fileArray[i].fileName, e.filearray[i].data)

BTW: the file is saved to the server computer, not to the users computer.

Does that help?

Here is a full sample of a working upload_file script:

function After_Upload as v (e as p)

status = "File Upload Complete."
dim cn as SQL::Connection
directory = convert_type(e.primaryKeyArray[2], "c")
attachdirectory = convert_type(e.primaryKeyArray[2], "c")
flagResult=cn.Open("::Name::MYSQLReservations")
IF flagResult = .f. THEN
status = "Unable to connect to database"
ELSE

for i = 1 to e.filecount

vcode = "insert into related_files (Trip_ID, Reservation_ID, Full_File_Name) values ("+ e.primaryKeyArray[2] + ", " +e.primaryKeyArray[1]+",'\\" + chr(92) + attachdirectory + "\\" + chr(92) + e.fileArray[i].fileName +"')"


file.dir_create_recurse(e.uploadFolderFullyQualified + chr(92) + "trips" + chr(92) + directory + chr(92) )

file.From_blob(e.uploadFolderFullyQualified + chr(92) + "trips" + chr(92) + directory + chr(92) + e.fileArray[i].fileName, e.filearray[i].data)

flagResult=cn.Execute(vcode)

IF flagResult = .f. THEN
status = "Unable to Execute."
e.abort = .t.
e.errorText = "Unable to Execute."
exit for
END IF

next i

END IF

cn.Close()

After_Upload = "window.parent.{grid.Object}.refresh(); window.parent.alert('"+status+"');"

end function

[canc]

Re: File Upload Feature pack

Thankyou Larry

Ahhhhhhh ok i didn't realise it was the file.from_blob bit did the upload to the server.......

this is the code I am using, I have the server directory specified in the file.from_blob.......... but it doesn't seem to upload the file to the server anywhere..... nor does it seem to do the refresh at the end...

can you see anywhere i have it wrong??

Thanks

Miles

function savefiles as v (e as p)
dim count as n
count = e.filecount
dim i as n
dim arr as p
arr = e.filearray
dim cn as sql::connection
dim cs as c
cs = e.tmpl.cs.connectionstring
cn.open(cs)
dim sql as c
sql = "insert into files(customer_id, file_name) values (:customerid, :filename)"
dim args as sql::Arguments
args.add("customerid",convert_type(e.primarykeyarray[1],"N"))
'args.add("customerid",2)
for i = 1 to count
dim fn as c
dim data as b
data = e.filearray[1].data
fn = "C:\fileman" + chr(92) = e.filearray[i].filename
file.From_blob(fn,data)
dim fntostore as c
fntostore = e.filearray[i].filename

args.add("filename",fntostore)
dim flag as l
flag = cn.execute(sql,args)
next i
cn.close()
e.javascript = "window.parent.(grid.object).refreshlinkedcontent();"

[lgrupido]

Re: File Upload Feature pack

for starters, the equal sign in:

fn = "C:\fileman" + chr(92) = e.filearray[i].filename

You should run in debug and check the value of fn before you go to file.from_blob. It may also be a problem with the "c:\fileman" part. You may need to do:

fn = "C:" + chr(92) + "fileman" + chr(92) + e.filearray[i].filename

Make sure the path is correct and that the directory on C exists and that you have permission to write to it.

Sometimes the refresh doesn't work like you expect - I think it's a timing issue. Instead of refreshing linked content, try refreshing the entire grid instead.

Larry