testcmd.asp

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· ASP 代码 · 共 36 行

ASP

36 行

<!-- #include virtual="/kjasp/func/DB.fun" -->
<%
Msg = "尚未输入指令"
DB = Request("DB")
If DB = Empty Then DB = "Sample.mdb"
SQL = Request("SQL")

On Error Resume Next
If SQL <> Empty Then
   Set conn = GetMdbConnection( DB )
   Set cmd = Server.CreateObject( "ADODB.Command" )

   Set cmd.ActiveConnection = conn
   cmd.CommandText = SQL
   cmd.Execute

   If Err.Number = 0 Then 
      Msg = "OK"
   Else
      Msg = Err.Description
   End If
End If
%>

<HTML>
<BODY bgcolor="#FFFFFF">
<H2>TestCmd.asp -- Action Query 测试程序<HR></H2>
<FORM Action=TestCmd.asp Method=POST>
数据库：<INPUT Type=Text Name=DB Value="<%=DB%>"><BR>
指令：<INPUT Type=Text Name=SQL Size=50 Value="<%=SQL%>"><P>
<INPUT Type=Submit Value=" 执行">
</FORM>
<HR>指令执行情况: <FONT Color=Red><%=Msg%>!</FONT>
</BODY>
</HTML>

testcmd.asp - 源码说明

本页面展示了「Active Server Pages 网页制作教程看之前请传到ASP空间。或者本地用iis。或安装pws内有说明」中的 testcmd.asp 源码文件，采用 ASP 编程语言编写，共 36 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Active相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?