|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Active Server Page技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。菜单|下拉 我是头一回晓得这个办法,之前从没听用过,之前假如我从数据库里读出内容来制造下拉菜单的话都是用轮回来做的,如今,让咱们来看一下老外的举措。
使用RecordSet.GetString来制造静态下拉菜单。
adodb.recordset的getstring办法有一些BUG,然而你利用得当心一点的话它可觉得您任务的很好。
先引见一下GETSTRING的用法……以下:
stringValue = rsObject.GetString( format, numRows, columnDelimiter, rowDelimiter, ifNull )
只需创立了RS对象,而且履行了响应操作,不论那是前往一条或多笔记录,乃至是空纪录,getstring照样任务,然而假如不加注重的话,这个了局能够就不大好玩了,:P(这个老外也够滑稽的)
FORMAT参数只要一个正当值,并且是可选的,让咱们略过不论它,假如您想前往全体纪录的话,那末谁人numrows参数也能够不论它了(可选),IFNULL……照我的了解就象TSQL里的isnull函数差不多,假如是NULL,则随意弄个值交换它,所以也不论它。
剩下两个参数了。。。。不多说空话了,先看他们的例子
<TABLE Border=1>
<TR><TD>
<% = Response.Write rs.GetString( , , "</TD><TD>", "</TD></TR><TR>", ) %>
</TABLE>
如许写的HTML了局以下:
<TABLE Border=1>
<TR>
<TD>row1, field1 value</TD>
<TD>row1, field2 value</TD>
</TR>
<TR>
<TD>row2, field1 value</TD>
<TD>row2, field2 value</TD>
</TR>
<TR>
</TABLE>
这个也是老外口中说的谁人BUG了,让咱们看一下详细怎样做的
<%
Set RS = conn.Execute("SELECT theValue,theText FROM selectOptionsTable ORDER BY theText")
optSuffix = "</OPTION>" & vbNewLine
valPrefix = "<OPTION Value='"
valSuffix = "'>"
opts = RS.GetString( , , valSuffix, optSuffix & valPrefix, "--error--" )
' Next line is the key to it!
opts = Left( opts, Len(opts)-Len(valPrefix) )
Response.Write "<SELECT ...>" & vbNewLine
Response.Write valPrefix & opts
Response.Write "</SELECT>"
%>
你用过这类办法么,假话,我可从没见过,也没听有人说起,:(
附带一下,您假如想创立一个准确的表格的话,也就是我头上说的谁人BUG,只需如许做就能够了:
<%
Set RS = conn.Execute("SELECT * FROM table")
tdSuffix = "</TD>" & vbNewLine & "<TD>
trPrefix = "<TR>" & vbNewLine & "<TD>"
trSuffix = "</TD>" & vbNewLine & "</TR>" & vbNewLine & "<TR>" & vbNewLine
opts = RS.GetString( , , tdSuffix, trSuffix & trPrefix, "--error--" )
' Next line is the key to it!
opts = Left( opts, Len(opts)-Len(trPrefix) )
Response.Write "<TABLE Border=1 CellPadding=5>" & vbNewLine
Response.Write trPrefix & opts
Response.Write "</TABLE>" & vbNewLine
%>
------------------------------------------------------------------------
再引见一个完整分歧的举措。。。(我看了快昏迷)
<%
SQL = "SELECT '<OPTION Value=''',value,'''>',text,'</OPTION>' FROM table ORDER BY text"
Set RS = conn.Execute(SQL)
Response.Write "<SELECT>" & vbNewLine & RS.GetString(,,"",vbNewLine) & "</SELECT>"
%>
你用过吗。。。
看到了吗?可以直接从查询中前往了局。
再进一步,您可以如许做(ACCESS下我试过)
<%
SQL = "SELECT '<OPTION Value=''' & value & '''>' & text & '</OPTION>' FROM table ORDER BY text"
Set RS = conn.Execute(SQL)
Response.Write "<SELECT>" & vbNewLine & RS.GetString(,,"",vbNewLine) & "</SELECT>"
%>
……………………
:(
不多说了
但愿能对你有所匡助
</p> asp,你就只能等着微软给你解决,它不乐意你就只好悲催。而且asp跑在windows服务器上,windows服务器跟linux比起来简直弱爆了! |
|