发新话题
打印

哪位能帮忙把几句VBSCRIPT帮心翻译成PHP?

本主题由 admin 于 2007-11-4 12:01 移动

哪位能帮忙把几句VBSCRIPT帮心翻译成PHP?

Set RootObj = createobject("RTXSAPIRootObj.RTXSAPIRootObj") '创建Root对象
   Set UserAuthObj2 =RootObj.UserAuthObj '通过根对象创建UserAuthObj2
       
   RootObj.ServerIP = "127.0.0.1" '服务器端口
   RootObj.ServerPort = 8006     '设置服务器端口

   bSucc = UserAuthObj2.SignatureAuth(strAccount, strSignature) '验证用户签名

   If bSucc = True Then
     MsgBox "验证成功"
   Else
     MsgBox "验证失败"
   End If

TOP

发新话题