Est ce que quelqu'un sait comment acceder une page protegee par linux apache server and Visual Basic 6.0?
Quel contrôle utilises-tu sous VB6?
Avec INET, j'aurais tendance à dire INET1.Execute, avec les bonnes valeurs passées en paramètres dnas les datas et/ou les headers.
Vincent Guichard
Alain B
On Sep 26, 10:44 am, Vincent Guichard wrote:
Quel contrôle utilises-tu sous VB6?
Avec INET, j'aurais tendance à dire INET1.Execute, avec les bonnes valeurs passées en paramètres dnas les datas et/ou les headers.
Vincent Guichard
Merci Vincent, simplement come cela:
Dim objXMLDoc As MSXML2.DOMDocument Dim objRoot As MSXML2.IXMLDOMElement, objChildNodes As MSXML2.IXMLDOMNodeList Dim objNode As MSXML2.IXMLDOMNode, objItem As MSXML2.IXMLDOMNode Dim strURL As String
If Not objXMLDoc Is Nothing Then Set objXMLDoc = Nothing Set objXMLDoc = New MSXML2.DOMDocument ... snap code away...
If objXMLDoc.ReadyState = 4 Then 'Receive response from the server Set objRoot = objXMLDoc.documentElement If objRoot Is Nothing Then GoTo ServerNotFound ...etc...
On Sep 26, 10:44 am, Vincent Guichard <vg.bleuciel...@wanadoo.fr>
wrote:
Quel contrôle utilises-tu sous VB6?
Avec INET, j'aurais tendance à dire INET1.Execute, avec les bonnes
valeurs passées en paramètres dnas les datas et/ou les headers.
Vincent Guichard
Merci Vincent, simplement come cela:
Dim objXMLDoc As MSXML2.DOMDocument
Dim objRoot As MSXML2.IXMLDOMElement, objChildNodes As
MSXML2.IXMLDOMNodeList
Dim objNode As MSXML2.IXMLDOMNode, objItem As MSXML2.IXMLDOMNode
Dim strURL As String
If Not objXMLDoc Is Nothing Then Set objXMLDoc = Nothing
Set objXMLDoc = New MSXML2.DOMDocument
... snap code away...
If objXMLDoc.ReadyState = 4 Then 'Receive response from the server
Set objRoot = objXMLDoc.documentElement
If objRoot Is Nothing Then GoTo ServerNotFound
...etc...
Avec INET, j'aurais tendance à dire INET1.Execute, avec les bonnes valeurs passées en paramètres dnas les datas et/ou les headers.
Vincent Guichard
Merci Vincent, simplement come cela:
Dim objXMLDoc As MSXML2.DOMDocument Dim objRoot As MSXML2.IXMLDOMElement, objChildNodes As MSXML2.IXMLDOMNodeList Dim objNode As MSXML2.IXMLDOMNode, objItem As MSXML2.IXMLDOMNode Dim strURL As String
If Not objXMLDoc Is Nothing Then Set objXMLDoc = Nothing Set objXMLDoc = New MSXML2.DOMDocument ... snap code away...
If objXMLDoc.ReadyState = 4 Then 'Receive response from the server Set objRoot = objXMLDoc.documentElement If objRoot Is Nothing Then GoTo ServerNotFound ...etc...
Vincent Guichard
Bonjour,
Utilise le contrôle INET pour faire ta requête (méthode Execute)et récupérer les données, puis charge les dans ton DOMDocument avec la méthode loadXML.
Je ne sais pas si les champs username et password du controle INET seront suffisants, ou si tu devras jouer plus en profondeur avec les paramètres de la méthode Execute.
Vincent Guichard
Bonjour,
Utilise le contrôle INET pour faire ta requête (méthode Execute)et
récupérer les données, puis charge les dans ton DOMDocument avec la
méthode loadXML.
Je ne sais pas si les champs username et password du controle INET
seront suffisants, ou si tu devras jouer plus en profondeur avec les
paramètres de la méthode Execute.
Utilise le contrôle INET pour faire ta requête (méthode Execute)et récupérer les données, puis charge les dans ton DOMDocument avec la méthode loadXML.
Je ne sais pas si les champs username et password du controle INET seront suffisants, ou si tu devras jouer plus en profondeur avec les paramètres de la méthode Execute.