Announcement

Collapse
No announcement yet.

VB6 -> PB9 conversion

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • VB6 -> PB9 conversion

    There is some sample code near the bottom of
    http://www.aspfree.com/c/a/VB.NET/Ca...ith-SOAP-30/2/

    Considering I am still a newbie with PB objects and to get me started right, what should this look like in proper PB9 form?

    The .dll is at C:\Program Files\Common Files\Microsoft Shared\OFFICE12\MSSOAP30.DLL which may or may not be registered (it is not on my PATH).
    Erich Schulman (KT4VOL/KTN4CA)
    Go Big Orange

  • #2
    With SOAP you have to use PB Automation because the methods and properties created by the server are dynamic.

    Code:
    #COMPILE EXE
    #DIM ALL
    
    FUNCTION PBMAIN () AS LONG
    
       LOCAL clnt AS DISPATCH
       LOCAL strsvc AS VARIANT
       LOCAL vWSDLFile AS VARIANT
       LOCAL vText AS VARIANT
    
       clnt = NEWCOM "MSSOAP.SoapClient30"
       IF ISNOTHING(clnt) THEN EXIT FUNCTION
    
       vWSDLFile = "http://localhost/CF_WebSvc/justFunction.cfc?wsdl"
       OBJECT CALL clnt.MSSoapInit(vWSDLFile)
       vText = "<some text>"
       OBJECT CALL clnt.WelcomeMsg(vText) TO strsvc
       MSGBOX VARIANT$(strsvc)
    
       clnt = NOTHING
    
    END FUNCTION
    Forum: http://www.jose.it-berater.org/smfforum/index.php

    Comment

    Working...
    X