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

asp 操作xml

<% dim xml,root,allitem,nodecount
set xml=server.CreateObject("MicroSoft.XMLDom")
      xml.load(server.mappath("style.xml"))
       if   xml.parseError.errorCode   <>   0   then 
  Response.Write   "xml.parseError.errorCode   =   "   &xml.parseError.errorCode 
  Response.Write   "xml.parseError.reason   =   "   &xml.parseError.reason   
  Response.Write   "xml.parseError.line   =   "   &xml.parseError.line 
  Response.End   
  end   if  
     
'      '查找一个节点对象
' Set   Root   =   xml.documentElement
' set   allitem=Root.selectNodes( "//style ")
'  nodeCount   =   allitem.length
'For   i=0   to   nodeCount-1
'     response.write  ( allitem(i).selectSingleNode( "S_ID ").text& " <br> ")
'next
'
'
'set objtofind=xml.documentElement.SelectSingleNode("//style/S_ID")
''取出这个节点对象的 节点名,节点值,某个属性值,和全部的xml
'nodename=objtofind.nodename
'nodevalue=objtofind.text
'response.Write(nodename)
'response.Write(nodevalue)
'response.Write("<br>")
'取出一个属性节点对象
set objattrtofind=xml.documentElement.SelectSingleNode("//style").GetAttributeNode("name")
'取出这个节点的属性名,属性值
nodeattrname=objattrtofind.nodename
nodeattrvalue=objattrtofind.text   
response.Write(nodeattrname)
response.Write(nodeattrvalue)
dim objNodes
  Set objNodes = xml.selectSingleNode("//style[@name=


相关文档:

asp数字分页示例共三个

<%
set rs=server.CreateObject(”ADODB.recordset”)
sql =”select * from 表”
rs.open sql,conn,1,1
page=cint(request(”page”))
n=rs.RecordCount
rs.pagesize=12
m=cint(rs.pagecount)
if page=”" then
page=1
elseif page<1 then
page=1
end if
if cint(r ......

Asp 常用函数

1.数值型函数: abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负 hex(num): 返回十六进制值 直接表示:&Hxx 最大8位 oct(num): 返回八进制值 直接表示:&Oxx 最大8位 sqr(num): 返回平方根 num>0 int(num): 取整 int(99.8)=99; int(-99.2)=100 fix(num): 取整 fix(99.8)=99; fix ......

ASP如何计算中英文混合字符串长度和截取字符串

用ASP做网站的时候经常会碰到要截取字符串的情况。ASP中的Len函数不管是中文字符,还是英文字符,统统按一个单位来计算,由于一个中文字符的宽度是一个英文字符宽度的两倍,在中英文混合的情况下字符串实际占用的宽度就不好计算了,如果按照Len函数计算的长度来截取字符串截出来的效果也会长短不一,下面是按照一个汉字相当 ......

asp、服务器端打开新窗口

asp.net中打开新窗口的多种方法(转载)
1.Response.Redirect("XXX.aspx",true)——直接转向新的页面,原窗口被代替;
2. Response.Write("
")——打开新的页面,原窗口被代替;
4.Server.Transfer("XXX.aspx")——打开新的页面;
5.Response.Write("
......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号