⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 adotest.asp

📁 python web programming 部分
💻 ASP
字号:
<%@ 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()
%>

⌨️ 快捷键说明

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