AI bliver først for alvor en del af arbejdet, når teknologien integreres i den måde, vi arbejder på. At have adgang til AI betyder ikke nødvendigvis, at medarbejderne er klar til at bruge den.
Ok, er dog ikke helt med endnu.. Jeg har lagt det ind således:
' ############## LOOP START ############################################# i = 0 if not Rec.BOF then Rec.AbsolutePage = intPageNumber do while Rec.AbsolutePage = intPageNumber i=i+1 pic0(i) = rec("Pbillede")
' ##########LOOP END ################################ Rec.MoveNext loop End If
Og den komme så med fejlen: ###################################################3
if not Rec.BOF then Rec.AbsolutePage = intPageNumber do while Rec.AbsolutePage = intPageNumber ReDim preserve pic(ubound(pic)+1) pic(ubound(pic)) = rec("Pbillede")
Åhhh, jeg har en værdi som hedder "thismanytotal" som udskriver hvor mange poster der er. Her ellers indsat følende som ikke melder fejl.. ------------------------------------------------------------------
ReDim pic(0)
if not Rec.BOF then Rec.AbsolutePage = intPageNumber do while Rec.AbsolutePage = intPageNumber ReDim preserve pic(ubound(pic)+1)
pic(ubound(pic)) = rec("Pbillede")
Rec.MoveNext loop End If
MEN hvis jeg prøver at udskrive værdien pic1 er den tom:
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.