当前位置:首页 > 开发 > 编程语言 > Web Service > 正文

用VBS脚本测试WebService

发表于: 2010-05-04   作者:bardo   来源:转载   浏览次数:
摘要: 用VBS脚本测试WEBSERVICE ( 2006-11-14 8:54 ) 注:以下代码需要客户端安装SOAP!! '********************************************************************************************* 'WEB SERVICE客户端可连通测试工具----版本:1.0 &
用VBS脚本测试WEBSERVICE ( 2006-11-14 8:54 )

注:以下代码需要客户端安装SOAP!!

'*********************************************************************************************
'WEB SERVICE客户端可连通测试工具----版本:1.0       AUTHOR: BARDO
'本工具可以直接运行,运行前,注意修改以下参数:
'1,如果是SOAP2.0,则将第10行代码改为:set SOAPClient = createobject("MSSOAP.SOAPClient")
'2,修改第12行中的URL,指向到所要测试的WEB SERVICE的WSDL
'3,修改完成后保存双击运行,如果出错,点OK,可以看到详细错误信息,如能连通,则返回Soap Sucess!
'4,注意如果此文件扩展名不是VBS,则要改为VBS,才能运行.
'*********************************************************************************************
Dim SOAPClient,ResultLogin,strTask
set SOAPClient = createobject("MSSOAP.SOAPClient30")
On Error Resume Next
SOAPClient.mssoapinit(" http://ServiceServer/ServiceName.jws?wsdl")
  If err then
    wscriptt.echo SOAPClient.faultString          '如果连不上,先返回失败串,
    wscriptt.echo SOAPClient.detail               '再返回失败详情
  Else
    wscriptt.echo "mssoapinit Sucess!"                  '连上以后返回
  End if

SOAPClient.ConnectorProperty("Timeout") = "30000"    ' sets to 30 secs
If err then
    wscriptt.echo SOAPClient.faultString         '如果连不上,先返回失败串,
    wscriptt.echo SOAPClient.detail               '再返回失败详情
  Else
    wscriptt.echo "Soap setTimeout Sucess!"                  '连上以后返回
  End if
ResultLogin = SOAPClient.runYourMethod("username", "password")
If err then
    wscriptt.echo SOAPClient.faultString          '如果连不上,先返回失败串,
    wscriptt.echo SOAPClient.detail               '再返回失败详情
Else
    wscriptt.echo "Soap runYourMethod Sucess!"                  '连上以后返回
End if

用VBS脚本测试WebService

  • 0

    开心

    开心

  • 0

    板砖

    板砖

  • 0

    感动

    感动

  • 0

    有用

    有用

  • 0

    疑问

    疑问

  • 0

    难过

    难过

  • 0

    无聊

    无聊

  • 0

    震惊

    震惊

编辑推荐
一、关于脚本 1)本文中的脚本完成以下功能: 随机生成3道二位数加法题,如果答题错误则在60秒后关
1. 选择在一个测试用例中测试多个方法,并为测试生成压力测试: 2. 为测试 Step 添加变量: 右键选
1. 选择在一个测试用例中测试多个方法,并为测试生成压力测试: 2. 为测试 Step 添加变量: 右键选
转载:http://www.cnblogs.com/fnng/archive/2011/08/11/2135440.html 第一步: 新建一个项目:点击
先说明一下,本人是开发,对测试不是特别熟悉,但因工作的需要,也做过一些性能测试方面的东西。比较
在运行带有 Internet 信息服务 (IIS) 6.0 的 Windows Server2003 的服务器上创建、删除和列出网站。
打印乘法口诀表:在C盘建立文件test.vbs,代码如下 '调用示例: '用 c: 和 cd / 命令到位置 C:\>
我这里添加的是网上公用的天气预报webservice,地址是:http://www.webxml.com.cn/WebServices/Weat
使用Jmeter对webservice进行压力测试 步骤: webservice开发中, 使用jmeter进行测试是很常用的手法
Jmeter 测试WebService 继上一记录JMeter的简单使用, 这里,记录JMeter 如何测试WebService ,虽然
版权所有 IT知识库 CopyRight © 2009-2015 IT知识库 IT610.com , All Rights Reserved. 京ICP备09083238号