Error och arrayloop

Fråga 1: Varför får jag detta felmeddelande när jag skall göra en msgbox. Får det även vid inputboxar.

Microsoft VBScript runtime error '800a0046'

Permission denied: 'MsgBox'

Fråga 2: Hur gör jag för att loopa ut allt i en tvådimesonel array?

dim strAbout(4,4)
strAbout(0,0) = "Namn 1"
strAbout(0,1) = "Telnr 1"
strAbout(1,0) = "Namn 2"
strAbout(1,1) = "Telnr 2"
strAbout(2,0) = "Namn 3"
strAbout(2,1) = "Telnr 3"
strAbout(3,0) = "Namn 4"
strAbout(3,1) = "Telnr 4"
strAbout(4,0) = "Namn 5"
strAbout(4,1) = "Telnr 5"

Fråga 1 .......visa lite kod kanske ;)

Fråga 2

[red]
For i = 0 To Ubound(StrAbout, 1)
Response.Write strAbout(i,0)
Response.Write strAbout(i,1)
Next
[/red]

.......

Tackar. :)

Hittade svaret om msgbox i en tidigare tråd.
http://www.webforum.nu/showthread.php?s=&threadid=42182

kanske fungerar:

For i = 0 To Ubound(StrAbout)
	for a = 0 to Ubound(StrAbout(i))
		Response.Write strAbout(i,a)
	next
Next