adotest.asp

来自「python web programming 部分」· ASP 代码 · 共 30 行

ASP
30 行
字号 
<%@ LANGUAGE="PYTHON" %>
<%
def _test():
    import os, sys, os, string

    eol = "\r\n"
    doc = ['<HTML><HEAD><TITLE>ADO Test App</TITLE></HEAD>\r\n<BODY>']
    doc.append('<H2>ADO test app</H2><P>')
    oConn = Server.CreateObject("ADODB.Connection")
    oConn.open("prom20", "promuser", "promuser")
    rs = Server.CreateObject("ADODB.Recordset")
    rs.Open("SELECT DptCode, DptName FROM department ORDER BY DptName", oConn)
    rs.MoveFirst()
    doc.append("<TABLE>")
    doc.append("<TR><TD><B>Code</B></TD><TD><B>Name</B></TD></TR>")
    while not rs.EOF:
        doc.append("<TR><TD>%s</TD><TD>%s</TD></TR>" %
        	(rs.Fields.Item("DptCode"), rs.Fields.Item(1).Value))
        rs.MoveNext()
    doc.append('</TABLE>')
    doc.append('</BODY></HTML>')
    rs.Close()
    oConn.Close()

    Response.Write(string.join(doc, eol))

_test()
%>

adotest.asp - 源码说明

本页面展示了「python web programming 部分」中的 adotest.asp 源码文件，采用 ASP 编程语言编写，共 30 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?