Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
dim names(2)
name(0) = "Tom"
name(1) = "Dick"
name(2) = "Harry"
with response
.write "Names: "
.write "<select name='name'>" & vbCrLf
for i = 0 to Ubound(names)
.write "<option value='" & names(i) & "'"
if names(i) = strName then
.write " selected='selected'"
end if
.write ">"
.write names(i)
.write "</option>" & vbCrLf
next
.write "</select>" & vbCrLf
end with