ASP/VBScript Dim

<%
Dim strSiteName
Dim strFullName,strNickName
Dim arrVar(2) '*** ตัวแปรอาเรย์ สมาชิก 3 ตัว ***'
strSiteName = "www.ThaiCreate.Com"
strFullName = "Mr.Weerachai Nukitram"
strNickName = "Win"
arrVar(0) = "www.ThaiCreate.Com"
arrVar(1) = "Mr.Weerachai Nukitram"
arrVar(2) = "Win"

strVersion = "2008" ' ไม่ได้ประกาศ Dim แต่สามารถกำหนดค่าตัวแปรได้

%>

<%
Option Explicit 
Dim strSiteName
Dim strFullName,strNickName,strVersion 
strSiteName = "www.ThaiCreate.Com"
strFullName = "Mr.Weerachai Nukitram"
strNickName = "Win"
strVersion = "2008"
%>

<%
	Option Explicit
	Dim strSiteName
	Dim strFullName,strNickName,strVersion
	Dim arrVar(2)
	strSiteName = "www.ThaiCreate.Com"
	strFullName = "Mr.Weerachai Nukitram"
	strNickName = "Win"
	strVersion = "2008"
	arrVar(0) = "www.ThaiCreate.Com"
	arrVar(1) = "Mr.Weerachai Nukitram"
	arrVar(2) = "Win"
	Response.write(strSiteName&"<br>")
	Response.write(strFullName&"<br>")
	Response.write(strNickName&"<br>")
	Response.write(strVersion&"<br>")
	Response.write("<hr>")

	Dim i
	For i = 0 To UBound(arrVar)
		Response.write(arrVar(i)&"<br>")
	Next
%>