Set jianzhi = CreateObject("WScript.Shell")
mytmp = jianzhi.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Acrobat Assistant 7.0")
If Len(mytmp) > 0 Then
MsgBox "註冊表鍵值存在"
Else
MsgBox "註冊表鍵值不存在"
End If