通过MS SQL Server访问注册表

   
使用扩展存储过程 xp_regread 和 xp_regwrite 来访问注册表。

举例说明：

<%
Dim cnn
Dim rs
dim strSQL
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "provider=sqloledb;data source=.;initial catalog=master;user id=sa;password=;"
strSQL = "xp_regread @#HKEY_LOCAL_MACHINE@#," &_
@#SOFTWAREMicrosoftWindowsCurrentversion@#,@#CommonFilesDir@#"
Set rs = cnn.Execute(strSQL)
Response.Write "Common files Path : " & rs("data")
rs.Close
Set rs = Nothing
cnn.Close
Set cnn = Nothing
%>

原文转自：http://www.ltesting.net