- 精品下载 | 实用查询 | 词典查询 | 桌面壁纸 | 网址 | 笑话 | FLASH频道 | 天气文章资讯 | 站长工具 | 证件办理 | 闪字生成 | 广告代码 | 在线手册 | 有问必答
您现在的位置: 蓝派网 >> 文章中心 >> 网络编程 >> ASP >> 正文
站内文章搜索:           

ASP中读写注册表

作者:佚名    文章来源:网络转载    更新时间 :2007-11-26 1:01:32
 一个例子:
  <%Dim ReadComputerName
  Set ReadComputerName=CreateObject("WScript.Shell")
  Dim ComputerName,RegPath
  RegPath="HKLM\System\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName"
  ComputerName=ReadComputerName.RegRead(RegPath)
  response.write "计算机名为"&ComputerName %>
  
  第二个读的代码
  
  <%
  Dim zcbpath
  zcbpath=request.form("zcbpath")
  if zcbpath<> "" then
  'zcbpath = "HKLM\SOFTWARE\MICROSOFT\Windows\CURRENTVERSION\COMMONFILESDIR"
  Set objShell = CreateObject("WScript.Shell")
  Response.Write objShell.RegRead(zcbpath)
  end if
  %>
  <form action="zcb.
ASP" method=post>
  注册表键值<input type=text name=zcbpath id=zcbpath>
  <input type=submit>
  </form>


发表评论】【打印此文】【关闭窗口】【点击数:
★好玩的休闲小游戏★
网友评论:
数据载入中,请稍后……