当前位置:主页 > 查看内容

如何在读取Excel文件时创建列表的下拉菜单?

发布时间:2021-04-20 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.Move……
< 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 >


本文转载自网络,原文链接:https://m.jb51.net/article/4687.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!

推荐图文


随机推荐