如何在讀取Excel文件時創(chuàng)建列表的下拉菜單？
更新時間：2006年11月16日 00:00:00 作者：
< select name="XlSheet" >
< %
vOptions = "< option >< /option >"
Do While Not oSchemaRs.EOF
If oSchemaRs("TABLE_TYPE") = "SYSTEM TABLE" Then
vOptions = vOptions & "< option >" & _
Server.htmlEncode(oSchemaRs("TABLE_NAME")) & _
"< /option >
End If
oSchemaRs.MoveNext
Loop
Response.Write vOptions
% >
< /select >
< %
vOptions = "< option >< /option >"
Do While Not oSchemaRs.EOF
If oSchemaRs("TABLE_TYPE") = "SYSTEM TABLE" Then
vOptions = vOptions & "< option >" & _
Server.htmlEncode(oSchemaRs("TABLE_NAME")) & _
"< /option >
End If
oSchemaRs.MoveNext
Loop
Response.Write vOptions
% >
< /select >
相關文章
如何偵測HTTP表頭信息？...2006-11-11
如何在網站中插播廣告？...2006-11-11
如何最準確地統(tǒng)計在線用戶數(shù)？...2006-11-11
如何制作K線圖？...2006-11-11
怎樣獲知數(shù)據(jù)庫的連接屬性？...2006-11-11
如何實現(xiàn)無組件上傳二進制文件？...2006-11-11
如何用ASP輸出HTML文件？...2006-11-11
如何讓計數(shù)器只對新進用戶計數(shù)？...2006-11-11
如何用POP3接收電子郵件？...2006-11-11
如何獲知文件最后的修改日期和時間？...2006-11-11