pourquoi le code ci-dessous ne fonctionne-t-il pas
mon serviceweb est public pour les test
Private Sub CommandButton1_Click()
Dim oTest As MSSOAPLib30.SoapClient30
Set oTest = New MSSOAPLib30.SoapClient30
oTest.MSSoapInit
"http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL",
"ServiceTest"
TextBox1 = oTestHelloWord() 'ca plante ici !!!!
Set oTest = Nothing
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Emmanuel NANCHEN
Peut-être qu'il manque un point '.' après oTest: TextBox1 = oTest.HelloWord() 'ca plante ici !!!!
Par ailleurs, je préfère écrire TextBox1.Text = oTest.HelloWord()
A+,
Emmanuel
"Frédéric LAMBOUR" a écrit dans le message news:
pourquoi le code ci-dessous ne fonctionne-t-il pas mon serviceweb est public pour les test
Private Sub CommandButton1_Click() Dim oTest As MSSOAPLib30.SoapClient30 Set oTest = New MSSOAPLib30.SoapClient30 oTest.MSSoapInit "http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL", "ServiceTest" TextBox1 = oTestHelloWord() 'ca plante ici !!!! Set oTest = Nothing End Sub
Peut-être qu'il manque un point '.' après oTest:
TextBox1 = oTest.HelloWord() 'ca plante ici !!!!
Par ailleurs, je préfère écrire
TextBox1.Text = oTest.HelloWord()
A+,
Emmanuel
"Frédéric LAMBOUR" <PasDeSpam_f.LAMBOUR@everlog.com> a écrit dans le message
news: uAlcjIJmDHA.2404@TK2MSFTNGP12.phx.gbl...
pourquoi le code ci-dessous ne fonctionne-t-il pas
mon serviceweb est public pour les test
Private Sub CommandButton1_Click()
Dim oTest As MSSOAPLib30.SoapClient30
Set oTest = New MSSOAPLib30.SoapClient30
oTest.MSSoapInit
"http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL",
"ServiceTest"
TextBox1 = oTestHelloWord() 'ca plante ici !!!!
Set oTest = Nothing
End Sub
Peut-être qu'il manque un point '.' après oTest: TextBox1 = oTest.HelloWord() 'ca plante ici !!!!
Par ailleurs, je préfère écrire TextBox1.Text = oTest.HelloWord()
A+,
Emmanuel
"Frédéric LAMBOUR" a écrit dans le message news:
pourquoi le code ci-dessous ne fonctionne-t-il pas mon serviceweb est public pour les test
Private Sub CommandButton1_Click() Dim oTest As MSSOAPLib30.SoapClient30 Set oTest = New MSSOAPLib30.SoapClient30 oTest.MSSoapInit "http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL", "ServiceTest" TextBox1 = oTestHelloWord() 'ca plante ici !!!! Set oTest = Nothing End Sub
Frédéric LAMBOUR
Ok j'ai essayé avec un autre service web et c'est bon.
"Frédéric LAMBOUR" a écrit dans le message de news:
pourquoi le code ci-dessous ne fonctionne-t-il pas mon serviceweb est public pour les test
Private Sub CommandButton1_Click() Dim oTest As MSSOAPLib30.SoapClient30 Set oTest = New MSSOAPLib30.SoapClient30 oTest.MSSoapInit "http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL", "ServiceTest" TextBox1 = oTestHelloWord() 'ca plante ici !!!! Set oTest = Nothing End Sub
Ok j'ai essayé avec un autre service web et c'est bon.
"Frédéric LAMBOUR" <PasDeSpam_f.LAMBOUR@everlog.com> a écrit dans le message
de news:uAlcjIJmDHA.2404@TK2MSFTNGP12.phx.gbl...
pourquoi le code ci-dessous ne fonctionne-t-il pas
mon serviceweb est public pour les test
Private Sub CommandButton1_Click()
Dim oTest As MSSOAPLib30.SoapClient30
Set oTest = New MSSOAPLib30.SoapClient30
oTest.MSSoapInit
"http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL",
"ServiceTest"
TextBox1 = oTestHelloWord() 'ca plante ici !!!!
Set oTest = Nothing
End Sub
Ok j'ai essayé avec un autre service web et c'est bon.
"Frédéric LAMBOUR" a écrit dans le message de news:
pourquoi le code ci-dessous ne fonctionne-t-il pas mon serviceweb est public pour les test
Private Sub CommandButton1_Click() Dim oTest As MSSOAPLib30.SoapClient30 Set oTest = New MSSOAPLib30.SoapClient30 oTest.MSSoapInit "http://fr.webmatrixhosting.net/PERCAPITA/SERVICETEST.ASMX?WSDL", "ServiceTest" TextBox1 = oTestHelloWord() 'ca plante ici !!!! Set oTest = Nothing End Sub
