5-02.asp
来自「包括本书所有的源代码。所有程序均在Windows 2000+IIS5.0+SQL」· ASP 代码 · 共 18 行
ASP
18 行
<HTML> <BODY>
<%
If Request("SQL") <>"" Then
strSQL = Request("SQL")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
Response.Write(strSQL)
conn.Execute(strSQL)
conn.close()
End If
%>
<FORM Action="5-02.asp" Method=POST>
指令:<INPUT Type="Text" Name="SQL" Size ="60" Value="<%=strSQL%>"><P>
<INPUT Type=Submit Value=" 执行">
</FORM><BR><A HREF="5-01.asp">查看</A>
</BODY> </HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?