Fylde Image.Name i array

Og hvad er der galt med din kode? :)

Dvs. hvilken fejlmeddelelse får du, når du har slået "Visning af uskadelige HTTP-fejl" fra under Funktioner --> Internetindstillinger --> Avanceret.

Det ku' selvfølgelig også være en fejl i den del af din kode, du ikke viser os. Dvs. sikkert i FileSystemObject-delen.

Her er fejlbeskeden ...

Error Type:
Sun ONE ASP VBScript runtime (0x800A0009)
Subscript out of range
/natalexsort.asp, line 82 (myarray(teller)=Image.Name)

Prøvede at ændre min kode til ...

'teller=1
Dim myarray()
'For Each Image In objFiles
myarray(1)="ged"
'teller=teller+1
'Next
'Set objFS = Nothing

Hvor jeg får samme fejl ...

Prøv lige at rette:

Dim myarray()

til:

Dim myarray(50)

hvor du så erstatter "50" med antallet af billeder (evt. et tal der er lidt højere end antallet af billeder).

Bare for at se, om det virker.

Det virker så fint ...

Men burde det være nødvendig ...

Så skal jeg bare lige tælle op hvormange billeder der er inden jeg dim'er arrayet ...
Det også bare fordi det der object files ikke kan sorter ...

Nej, det burde ikke være nødvendig. Men det var nødvendigt for at finde fejlen. =) Nu ved vi, at fejlen opstår, fordi den ikke ved, hvor mange poster der må være i arrayet.

Se evt. her:

http://www.codefixer.com/tutorials/dynamic_arrays.asp

Så den skal altså vide hvormange felter  der skal være i arrayet, jeg kan jo selvfølgelig redim'e men det tager nok for lang tid.

Tak ...

Du sender nok et svar ...

Søren

Det kommer her. =)

Tak.

jeg kan så bare ikke

Dim myarray(antbilled)

Søren

Nej, den vil vist ikke, fordi antbilled ikke er en konstant, så derfor skal du redimme.

Førs så 
    dim Array()

Tælle op og
    redim array(antal)

Så kører det ...