---

Hej

Jeg skal lave et clientside vbscript der kopierer alle tabeller på min html
side til Excel. Normalt ville jeg lave et sheet objekt og tilføje indholdet af
min tabel som følger:

For i = 1 to oTable2.rows.length-1
For j = 0 to oTable2.rows(i).cells.length-1
oSheet.Cells(i+6, j+1).Value =
oTable2.rows(i).cells(j).innerText
Next
Next

hvor oTabel2 er Id på den tabel jeg vil kopierer.

I dette tilfælde ved jeg dog ikke hvad Id er på de forskellige tabeller (og
jeg ved heller ikke hvor mange der er).

Mit spørgsmål er så, hvordan kan jeg i vbScript få fat i alle tabel
objekterne, altså lidt ligesom

For i = 0 to Tables.length-1
ATable = Tables(i)

mvh
Kim

---

Hej Kim

Jeg programmerer mest i JavaScript, men jeg kan ikke forestille mig at det
er specielt anderledes i VBScript, da DOM jo er den samme...

For at få alle tabeller på en side i JavaScript vil jeg skrive følgende;

var Tables = document.getElementsByTagName("TABLE")

I VBScript vil det sikker være:
Dim Tables
Tables = Document.getElementsByTagName("TABLE")

Tables er et array der starter med værdien nul.
Dette "tabel-array" kan du efterfølgende bearbejde i en for-next løkke...

/Carsten Suurland