数据库中的信息存储在asp下的xml文件中。
save.asp<
常量文件包括在上面。
如果文件存在，请删除
昏暗的objfso
集objfso = server.createobject（脚本。FileSystemObject ）
如果objfso.fileexists（server.mappath（db_xml。XML））然后
ObjFSO.DeleteFile Server.MapPath（db_xml。XML）
最后如果
集objfso =没有
变量声明
昏暗的cnnxml的ADO连接
昏暗的rstxml的ADO记录集
创建数据连接对象
集cnnxml = server.createobject（数据连接）
这是连接access数据库的一个示例。
cnnxml.open提供商=微软。飞机。OLEDB数据源= _。4；
server.mappath（db_scratch .mdb）；
SQLServer是以下的一个例子：
cnnxml。开放商= SQLOLEDB；数据源= 10.2.1.214；_
初始目录=样品；用户ID =样品；密码=密码；_
连接超时时间= 15；网络图书馆= dbmssocn；
集rstxml = server.createobject（ADODB。记录集）
集rstxml = cnnxml。执行（SELECT * FROM ID；抓秩序）
响应。写数据保存为XML vbcrlf…
保存到XML格式。
rstxml。节省server.mappath（db_xml。XML），adpersistxml
关闭对象，释放资源
rstxml。关闭
集rstxml =没有
cnnxml。关闭
集cnnxml =没有
响应。写XML文件的书面vbcrlf…
响应写点击这里查看文件。vbcrlf
%>