这帖子分二部分:
1:
asp获取ACCESS二进制图片到XML文件并还原的例子!: 请看6楼的代码部分: 2:
下面的代码经过我的测试,已经成功用ASP+XML备份ACCESS数据库! 1.获得数据文件的 getpic.asp:
<%
dim rs,xmldoc,xmldom,xmlnode '定义对象
dim sourcefile
'set showinfo = new showclass
'showinfo.dbopen()
'showinfo.mysql = "select pro from [pro] where type = 'flyship'"
'set rs = showinfo.myrs()
' response.binarywrite rs(0)
' response.end
sourcefile = server.mappath("loadpic.xml")
set xmldom = server.createobject("Microsoft.XMLDOM")
xmldom.load(sourcefile)
set xmldoc = xmldom.documentElement.selectSingleNode("image")
set adostream = server.createobject("ADODB.Stream")
adostream.type = 1
adostream.open()
adostream.loadfromfile(server.mappath("right.htm"))
set xmlnode = xmldom.createElement("imagedata")
xmlnode.datatype = "bin.base64"
xmlnode.nodeTypedValue = adostream.read()
adostream.close
xmldoc.appendchild(xmlnode)
XMLdom.save(sourcefile)
set xmlnode = nothing
set xmldoc = nothing
set xmldom = nothing
set rs = nothing
set showinfo = nothing
response.write "ok"
%>
'=================================
2.loadpic.xml 文件:
<?xml version="1.0" encoding="gb2312"?>
<picture>
<image>
<imagedata xmlns:dt="urn:schemas-microsoft-com:datatypes" dt:dt="bin.base64">PGh0bWw+PC9odG1sPg==</imagedata></image>
</picture>
'=============================================
3.loadpic.asp 文件:
<%
dim xmldoc,xmldom,xmlnode '定义对象
dim sourcefile
sourcefile = server.mappath("loadpic.xml")
set xmldom = server.createobject("Microsoft.XMLDOM")
xmldom.load(sourcefile)
set xmldoc = xmldom.documentElement.selectSingleNode("image/imagedata")
'response.write instr(xmldoc.nodetypedValue,"/")
'response.end
set adostream = server.createobject("ADODB.Stream")
adostream.type = 1
adostream.open
adostream.write xmldoc.nodeTypedValue adostream.savetofile "index.htm",2
adostream.close
set xmldoc = nothing
set xmldom = nothing
set adostream = nothing
response.write "ok"
%>
[此贴子已经被作者于2005-7-8 17:41:02编辑过]
[返回] 中文XML论坛 - 专业的XML技术讨论区 →
XML.ORG.CN讨论区 - XML技术 → 『 XML基础 』 → [原创]asp获取ACCESS二进制图片到XML文件并还原的例子!
(订阅本版)
2005/5/25 16:38:00
顶端 
[原创]asp获取ACCESS二进制图片到XML文件并还原的例子!(2573字) － dickyq，2005年5月25日
新浪微博
