[url=http://www.lxasp.com/bbs/Announce/Announce.asp?BoardID=3&ID=14]［到此下载］[/url]

使用模板技术的作用是ASP服务器端代码与客户端HTML代码分离，以方便修改客户端HTML界面代码。使得你的ASP文件不再是一段HTML一段<% ... %>ASP代码的混杂在一起而让代码混乱难以阅读。

以下是本演示程序中的“打印预览”的代码片断。此打印预览出来的效果是准备打印一张“B0纸型”（大概横为1米）幅面的。我想菜鸟们应该很少遇到要用ASP程序来做一个用于打印B0纸型幅面大小的功能程序吧！一般菜鸟可能认为ASP做的都是标准的网页界面，而这里却用浏览器的网页打印功能来做用于打印的界面。
[quote]
Sub ShowUI()
    Dim curID
    Dim t
    
    curID=Request.QueryString("id")
    If Len(curID)=0 Then Exit Sub
    If Not IsNumeric(curID) Then Exit Sub
    
    SQL = "SELECT * FROM cont_corp WHERE cd_id="&curID
    Set rs=Server.CreateObject("ADODB.Recordset")
    rs.Open SQL,conn,1,1 '11 for Read '13 for Write
    sqlcount=sqlcount+1
    If rs.EOF And rs.BOF Then
        Response.Write "找不到ID"
    Else
        rs.MoveFirst
        Set t=LoadPage("printb0")
        t("name")=rs("cd_name")
        t("intro")=rs("cd_intro")
        t("addr")=rs("cd_addr")
        t("man")=rs("cd_man")
        t("phone")=rs("cd_phone")
        t("info1")=rs("cd_info1")
        t("info2")=rs("cd_info2")
        Response.Write t.GetOutput
    End If
    rs.Close
    Set rs = Nothing

End Sub
[/quote]