当前位置: 首页IT技术 → 关于ASP读写注册表的实例分享

关于ASP读写注册表的实例分享

更多

下面提供的是关于ASP读写注册表的实例,希望对初学ASP的朋友们有所帮助。

一个例子:
  <%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>

热门评论
最新评论
昵称:
表情: 高兴 可 汗 我不要 害羞 好 下下下 送花 屎 亲亲
字数: 0/500 (您的评论需要经过审核才能显示)