For a = 1 To UBound(arr1) For b = 1 To UBound(arr2) result=arr1(a)-arr2(b) strOut=strOut&result&vbTab Next strOut = strOut&vbCrLf Next msgbox strOut 'eller resoponse.write strOut alt efter om du bruger vbs eller asp
Nej, jeg har nok ikke formuleret mig helt perfekt.. :P
Jeg har en database med en tabel der hedder "tickets".
Jeg skal lave et udtræk fra den tabel.
En post i tabellen svarer til en ticket (eller opgave om man vil). En ticket kan være parent eller child eller bare en "almindelig" ticket (ikke parent/child).
I udtrækket vil jeg have alle tickets med parent/childs først, fx:
ID | Parent/child (baseret på relationer i en anden tabel) ---------------------------- 12312 | Parent 12331 | Child 12332 | Child 12431 | Parent 12531 | Child 11300 | 12302 | 12304 | 12370 | 12521 | etc.. etc..
Det jeg gør er at tjekke alle tickets om de er parent/child og tilføjer dem i udtrækket og når de er tilføjet så bliver de tilføjet til array1.
Problemet er så når jeg skal gennemløbe alle tickets og tilføje dem efter parent/child delen, men der skal jeg jo undgå at tilføje de allerede tilføjede tickets igen.
Derfor har jeg et array (array1) som består af de tilføjede tickets.
Og array2 indeholder så alle tickets (tabellen gennemløbet).
Man kan selvfølgelig lave en array som tynder ud i arr2 så værdierne fra arr1 fjernes. Men mon ikke du kan lave et eller andet smart med databasen når du nu alligevel har data her. Jeg har dog ikke helt overblik over din database så der er jeg ikke til megen hjælp.
For a = 1 To UBound(arr2) isInArr1=false For b = 1 To UBound(arr1) if arr1(b)=arr2(a) then isInArr1=true Next if not isInArr1 then strOut=strOut&","&arr2(a) Next msgbox strOut arr2 = Split(strOut,",")
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.
