📄 ex1.asp
字号:
<!--#INCLUDE VIRTUAL="ADOVBS.inc"-->
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Set MyCmd=Server.CreateObject("ADODB.Command")
Conn.Open "FILEDSN=d:\Program Files\Common Files\ODBC\Data Sources\MyDb.dsn "
Set MyCmd.ActiveConnection=Conn
MyCmd.CommandType=adCMdStoredProc
MyCmd.CommandText="sp_HighandLow"
Set MyFirstParam=MyCmd.CreateParameter("HighUser",adVarChar,adParamOutput,30)
MyCmd.Parameters.Append MyFirstParam
Set MySecondParam=MyCmd.CreateParameter("LowUser",adVarChar,adParamOutput,30)
MyCmd.ParaMeters.Append MySecondParam
MyCmd.Execute
%>
<p>按字母顺序排名最后的人是
<%=MyCmd("HighUser")%>
<p>按字母顺序排名最前的人是
<%=MyCmd("LowUser")%>
<%
Conn.Close
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -