Loop through a single form control collection while uploading file

mat41 · January 15th, 2014, 09:24 PM

I remember this issue from a while ago. I never solved it then and now its hitting me in the face again. The code I have inherited uses SoftArtisans.FileUp to upload files. There is a migration and the new requirement is to use Persits.Upload. EG:

Code:

set xyz = Server.CreateObject("Persits.Upload")

In short the page form has two multi line select areas and a file upload. The processing page needs to loop through the number of items which have been selected multi line select area. So using SoftArtisans.FileUp this works:

Code:

'for i = 1 to upl.formex("fieldName").Count
   somevariable = upl.formex("fieldName")(a)
   sql = "..do something with variable..."
Next

but after changing this to use "Persits.Upload" I have unfortunately remembered that it does not have a Count property. I can not figure out any way to fire a loop based on the number of items the user has selected. Form what I can figure only the first selection is available when using Persits.Upload. EG this shows me the first selection :

Code:

response.write upl.form("fieldName")

Is there any way to access the collection of values which the user has selected in a single multi line select area??? Here is the first line of the FOR loops that I have tried, all fail:

Code:

for i = 1 to upl.form("fieldName").Count

for a = 1 to uBound(upl.form("fieldName"))

I have searched the Persits.Upload website, there no mention of this. The only loop example they give is when multiple files are being uploaded. Surely there is a way????? Help...

Imar · January 16th, 2014, 05:59 AM

Can't you just loop over upload.Form as described here: http://www.aspupload.com/object_upload.html#Form and check the keys?

Imar

mat41 · January 16th, 2014, 03:24 PM

Hi Imar. I had not found this when I posted. I did find it before the end of the day however it didn't work for me......Anyhow, a new day now and it does work. The solution is

Code:

For Each Item in upl.Form
   If Item.name = "fieldName" Then
      'and now use Item.name
    End If
Next

Thanking you

Imar · January 17th, 2014, 03:44 AM

Quote:

Anyhow, a new day now and it does work.

That's what new days tend to do ;-) Glad to hear it's working.

Cheers,

Imar