易截截图软件、单文件、免安装、纯绿色、仅160KB

哪位高手会XML?请教XDR验证XML问题

这是验证代码
<%@page language="vb"%> 
<%@import namespace="system.xml"%> 
<%@import namespace="system.xml.schema"%> 
<script runat="server"> 
dim xtr as xmltextreader 
dim xvr as xmlvalidatingreader 

sub page_load(ob as object,ev as eventargs) 
try 
xtr= new xmltextreader(server.mappath("xml.xml")) 
xvr=new xmlvalidatingreader(xtr) 
xvr.validationtype=validationtype.schema 
addhandler xvr.validationeventhandler,addressof showerror 
while xvr.read 
end while 

catch ex as exception 
response.write("error accessing xml file") 

finally 
xtr.close 
xvr.close 
end try 

end sub 


sub showerror(ob as object,ev as validationeventargs) 
response.write(" <font color='red'>" & ev.message & " </font> <br>") 
response.write("line:" & xtr.linenumber & "position:" & xtr.lineposition) 
end sub 
</script> 
<html> 
<body> 

</body> 
</html> 


xmlschema.xdr模式文件内容
<?xml version="1.0"?> 
&


相关问答:

在这样一个xml文件里如何选择特点节点

<?xml version="1.0" encoding="UTF-8" ?> 
<root> 
<video> 
  <device deviceid="\\?\usb#vid_0c45&pid_613b#5&2d0620de& ......

java xml文题 - Java / Java SE

<?xml version="1.0" encoding="utf-8" ?> 
- <LinearLayout xmlns:android="http://schemas.android.com/apk/res/android" android:orientation="vertical&q ......

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

vb读取xml - VB / 基础类

现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

symbian中,求xml解析例子 - 移动平台 / Symbian

用xml解析后,然后再listbox中写实出来。
注:使用系统提供的xml解析器。。。有没有这方面的例子。。哪位发我一份。
邮箱:707857176@qq.com
用SyExpat啊 sax的。


www.devdiv.net可以搜到用法,也可以搜 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号