易截截图软件、单文件、免安装、纯绿色、仅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和fso实现上传文件

'---------------------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<%if Request.Cookies("venshop")("user_name")<>"" then%>'当用户登录时可以执行then
<script>
   function checkAll(){
&nbs ......

asp和fso实现新建文件夹

'-------------------------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<%if Request.Cookies("venshop")("user_name")<>"" then%>
<script>
   function checkAll(){
   for (i=0;i&l ......

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获取和还原复选框的值(0~99多项选择)

    在多项选择的一些应用中,可以用二进制1代表选中,0代表不选。例如给某用户角色分配权限abcdefg,选中情况是1001101,那么此角色包含四项权限,用一个变量表示,相应的十进制数是77。
    但是,在ASP中的多项选择,就不适合这种以数值的形式记录选中情况。因为,当项目数很多时(例如6 ......

在xp系统下安装iis并且成功的运行asp文件

1.在我的电脑右键的”管理“中找到“本地用户和组”,然后单击”用户“,在右边会看到一个叫"IWAM_20020101-0024"的用户,这是iiis安装时自己创建的内置账户,点右键“设置密码”,点继续,然后输入“新密码”和“确认密码”。“IWAM_20020101-0024&rdqu ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号