易截截图软件、单文件、免安装、纯绿色、仅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中form表单的图片按钮

1、<script>按钮: 
<input type="button" name="btnRead" onClick="readCard()" style="background:url(images/qux1.gif); border:none; width:145px; height:30px;"  />&nbsp;
2、提交按钮:
<input type="submit" name="button" id="button" style="background:url(images/tj.gif); bor ......

asp操作数据库代码

 set conn=server.createobject("adodb.connection")
 conn.open "driver={microsoft access driver (*.mdb)};dbq=F:\\ajaxpro\\App_Data\\server.mdb"
 
 Dim StrSQL,RS
 StrSQL="SELECT*from Manager WHERE ID='"&username&"'"
 StrSQL=StrSQL&"AND Pin='"&passwor ......

[ASP中使用三层架构] 2.目录

1          前言
2          简述三层架构
3          建立站点的大体结构
3.1       代码目录
3.2       首 ......

ASP 网页登录1秒后自动模拟点击input按钮

<input type="submit" name=""byt id="byt" value="现金销售提交"   >
例如:表单中有一个名为 byt 的按钮,要求网页打开1秒后,自动点击按钮,
方法:把如下代码加在</form>后。
<script language="javascript">
function window.onload()
{
setTimeout("document.form1.byt.click()",1 ......

ASP取不重复的随机数

dim arr(36),xx,tt,tmp
for xx=1 to 36
arr(xx-1)=xx
next

for xx=1 to 5
Randomize
tt=clng((ubound(arr)-xx)*rnd())
response.write(arr(tt) & "<br>")

tmp=arr(tt)
arr(tt)=arr(ubound(arr)-xx)
arr(ubou ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号