阿里西西_WEB开发
在线留言 | Alexa查询 | 在线工具 | 技术论坛 | 会员注册 | 繁文
  • 首页
  • WEB编程
  • WEB设计
  • WEB标准
  • 脚本特效
  • WEB安全
  • 数据库
  • 开发工具
  • 资源下载
  • WEB资讯
欢迎访问阿里西西WEB开发技术网站!
  • → ASP编程|
  • PHP编程|
  • JSP编程|
  • ASP.NET|
  • C#.NET|
  • VB.NET|
  • Cgi/Perl|
  • XML/RSS|
  • JAVA/AJAX|
  • → WEB设计软件|
  • WEB设计艺术|
  • WEB设计规范|
  • WEB设计欣赏|
  • → HTML|
  • XHTML|
  • CSS样式表|
  • → JavaScript|
  • VBScript|
  • → WEB服务器|
  • WEB黑客攻防|
  • WEB攻防工具|
  • → ACCESS|
  • MSSQL|
  • MySQL|
  • Oracle|
  • PowerBuilder|
  • FoxPro|
  • DB2|
  • → Dreamweaver|
  • FrontPage|
  • Fireworks|
  • FLASH|
  • Ultradev|
  • 精品工具|
  • → 电子教程手册|
  • 语言参考手册|
  • 网站开发文档|
  • 精典源码函数|
  • → 互联网新闻|
  • WEB市场推广|
  • WEB程序员专栏|
阿里西西WEB开发
  • ASP编程
  • PHP编程
  • JSP编程
  • ASP.NET
  • Cgi/Perl
  • XML/RSS
  • C#.NET
  • VB.NET
  • JAVA/AJAX
 

首页 / WEB编程 / ASP编程 /

[ASP编程] ASP读写注册表

作者:[转载]  文章来源:http://www.alixixi.com/  更新时间:2006-5-26
 一个例子:
<%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>
【发表评论】 【加入收藏】 【打印此文】 【关闭窗口】
  • 上一篇:网页视频播放器程序代码(通用代码),支持avi,wmv,asf,mov,rm,ra,ram等   [2006-5-18]
  • 下一篇:列出sql服务器上所有库的代码   [2006-5-26]
网友评论
相关搜索
阿里西西Baidu.com搜索
阿里西西_WEB开发
  • 关于我们|网站地图|隐私和安全性|联系我们|在线工具|友情链接|粤ICP备05097432号
  • ©2004-2005 Alixixi Development Team.All rights reserved 保留所有权利。
  • 访问本网站表明您同意信息使用条款。 符合XHTML标准站点 符合CSS标准站点 W3Csites.com Listed