| 摘要：介绍了新一代动态网页开发工具ASP的工作原理及内置对象，结合实际应用探讨了如何使机械CAD软件中的数据库与Web服务器进行连接，并利用ASP技术在Internet/Intranet 上实现对数据库的远程访问。 |
随着Internet/Intranet 的高速发展，制造企业产品开发的方法正在迅速地发生变化，企业正处在构造一个能进行异地设计与制造的环境的过程中，作为计算机集成制造系统(CIMS)的重要组成部分和信息源头，计算机辅助设计(CAD)过程中所涉及到的产品设计信息在不同企业之间、同一企业不同部门之间应当能实现信息共享。例如，企业内的信息消费者(Information Consumers)，包括管理部、市场部、供应部等需要经常查看产品设计数据及其相关资料。为满足以上需求，通过Web服务器将产品设计信息进行发布，客户端通过浏览器浏览将是实现信息共享的最佳手段。ASP作为新一代动态网页开发工具，执行效率高，利用其组件可以方便地访问数据库，查询数据库中的最新数据信息，同时，ASP程序在服务器端解释执行，不必选择特定的浏览器，具有更广泛的应用范围。 1 ASP简介
ASP(Active Server Pages)实际上是运行于Web服务器上的动态网页，ASP存取数据的方法遵循CGI标准，但它大大简化了编程方法。ASP提供一个服务器端的scripting 环境，产生和执行动态、交互式、高效率的站点服务器的应用程序，并使站点服务器自动将ASP的程序代码解释为标准HTML格式的内容，生成相对简单的页面返回给浏览器。任何简单的浏览器都可以浏览这些生成的页面，而动态网页并不直接返回给浏览器。 ASP文件的扩展名是.asp，它是一个文本文件。在ASP文件中包括：HTML标记、VBscript或Javascript语言的程序代码、ASP语法。HTML标记使用“<>”将HTML程序代码包含起来，与常规的文本区分开来：而ASP使用“<% %>”将ASP的Scrtpt程序代码包含起来。 2 ASP的内建对象
在面向对象编程中，对象就是指由作为完整实体的操作和数据组成的变量。对象是基于特定模型的。在对象中，客户使用对象的服务是通过由一组方法或相关函数的接口来访问对象的数据的，然后客户端可以调用这些方法执行某种操作。使用ASP的Server.CreateObject 方法可以创建对象的实例，使用脚本语言的变量分配指令可以为对象实例命名。例如：Set db=Server.CreateObject(“ADODB.Connection”)，这里的变量db 就是ASP 程序创建的访问数据库的对象实例。目前的ASP 版本总共提供了六个内建对象： - Request对象：取得用户信息。用来取得任何由HTTP请求传递过来的信息，包括使用POST和GET传递的参数，以及从服务器和客户端认证所传递的cookie等。
- Response对象：传递信息给用户。可以使用它的方法输出信息到浏览器屏幕，或将使用者转移到另一个URL，并可以控制内容形态和设定cookie值。
- Server对象：控制ASP的执行环境。提供存取Web 服务器的方法和属性。
- Session对象：储存使用者对话的相关信息。此对象仅适用于一个使用者，可以用它来记录使用者的爱好并且为每一个使用者保留一个SessionID。
- Application对象：为应用程序的所有使用者设置属性，并且传送信息给使用者。
- ObjectContext对象：提供在页面内进行事物处理的功能。
使用以上的内建对象，可以得到浏览器传过来的信息，向浏览器输出信息，记录单一用户，创建全体用户操作量，以及创建组件等。 3 ASP 访问站点数据库的方法
ASP采用ADO(ActiveX Data Object)技术来访问后台的数据库，ADO是微软提供的最新站点数据库访问技术，它是ASP的一个组件，通过ODBC驱动程序连接相应的数据库。ASP访问数据库的过程是：当浏览器向Web服务器申请访问一个ASP文件时，Web 服务器，调用ASP 文件，然后解释执行每一条脚本语句，用ADO 组件通过ODBC 访问数据库，再把执行的结果生成HTML 文件传给客户端。 下面具体介绍ASP 访问站点数据库的步骤。 - 设定ODBC与数据库的连接。启动控制面板中“ODBC”，建立新的数据源，按“添加”按钮，选择数据源驱动程序，然后填好数据源名称(DSN)及数据库名称。
- 创建连接。使用“Server.Createobject”建立连接的对象，使用“Open”打开待访问查询的数据库。
- Set conn=server.createobject(“adodb.connec-tion”)
- 打开数据库。调用conn.open 方法打开数据库：
- Conn.open“dsn=：uid=：pwd=：”
- 调用conn.execute 方法建立Recordset 对象。
- Set rs=conn.execute(参数)，参数可以是SQL命令或一个表名。
- 使用Recordset 对象的命令，显示查询结果。
- rs.fields(I).name：第一个字段名
- rs.fields(I).value：第一个字段的值
- 关闭数据库的连接
- rs.close
- conn.close
图1 查询界面 |
图2 凸轮机构基本尺寸参数表查询结果 |
4 凸轮机构数据库查询系统的设计
该查询系统由cad.htm文件和search.asp文件组成，cad.htm文件定义了待查询数据库中数据表的名称(见图1)，当用户选择数据表名后，按“查询”按钮，将变量传到search.asp文件中，search.asp根据变量的值在Web服务器端经解释执行后完成数据表数据的查询，最后将查询结果送回浏览器端，其中凸轮机构基本尺寸参数表查询结果见图2。 search.asp 程序源代码为：
<% sub rstotable(rs)
response.write" <center> <TABLE BORDER=1> "
For i=0 to rs.Fields.Count-1 response.write" <TD> "&rs.Fields (i).name & " </TD> "
next
response.write" </TR> "
while not rs.EOF response.write" <TR> " for i=0 to rs.fields.count-1 response.write" <TD> " & rs.fields (i).value & " </TD> " next response.write" </TR> "
rs.movenext
wend
response.write" <TABLE> </CENTER> "
end sub %>
<html> <head>
<title> 统计查询</title>
</head> <body>
<%
set conn=server.createobject( "ADODB.Connection")
conn.open "dsn=paramdatabasae：uid=：pwd=："
if request.form("table")="凸轮机构推程参数表" then response.write"凸轮机构推程参数表：" set rs=conn.execute("凸轮机构推程参数表")else if request.form("table")="凸轮机构回程参数表" then response.write"凸轮机构回程参数表：" set rs=conn.execute("凸轮机构回程参数表") else if request.form("table")="凸轮机构基本尺寸参数表"then response.write"凸轮机构基本尺寸参数表：" set rs=conn.execute("凸轮机构基本尺寸参数表") else response.write"凸轮轮廓数据表：" set rs=conn.execute("凸轮轮廓数据表") end if end if
end if
rstotable rs %>
</body> </html> |
5 结论
通过具体应用，说明利用ASP在Internet/Intranet上实现对数据库的远程访问技术高效、实用，是现代制造企业实现信息共享的重要手段。 
