webservice地址从配置文件读取

Sub NEW
   '设置dotNet平台的服务器地址
  Dim session As New NotesSession
  NETPath$=session.GetEnvironmentString("NETPath",False)
  Call Service.Initialize ("HttpWwwZzrsengComWebServiceYaojian", _
  "WebServiceYaojian.WebServiceYaojianSoap", NETPath$+"/yaojian/WebServiceXXXX.asmx", _
  "WebServiceYaojianSoap_n0")

End Sub