post and get form action

User avatar
sal21
PlatinumLounger
Posts: 4320
Joined: 26 Apr 2010, 17:36

post and get form action

Post by sal21 »

naturally other methods are welcome

Code: Select all

Public Sub Sal21()

Dim myHTMLDoc As New HTMLDocument

With CreateObject("MSXML2.XMLHTTP")

.Open "GET", "https://italia.indettaglio.it/ita/cap/cap_citta.html?regione=campania&regione_estesa=Campania&citta=Napoli", False
.send
myHTMLDoc.body.innerHTML = .responseText

'Debug.Print .responseText

.Open "POST", "https://italia.indettaglio.it/ita/cap/cap_citta_out.html", False
.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
.send "capi_cap=80121"
myHTMLDoc.body.innerHTML = .responseText

Debug.Print .responseText

End With

End Sub
Dont work!

In effect i need to show all value in table result!

for example:

go to
https://italia.indettaglio.it/ita/cap/c ... tta=Napoli

selct from CAP 80121

press ricerca button

appear at table with the filtered parameter

NOTE:
the last Debug.Print .responseText, dont contain the result of table
i'm on vb6

User avatar
SpeakEasy
4StarLounger
Posts: 506
Joined: 27 Jun 2021, 10:46

Re: post and get form action

Post by SpeakEasy »

Looks like you are cross-posting ...

https://www.tek-tips.com/viewthread.cfm?qid=1828052