|
|||||||
|
|
|
 |
|
|
Strumenti |
26-03-2013, 22:28
|
#1 |
|
Junior Member
Iscritto dal: Mar 2013
Messaggi: 11
|
[PHP - VB6 - Linux] Problema lettura pagina
Da visual basic leggo una pagina con scritto solo ed esclusivamente
Codice HTML:
ok Codice HTML:
<html><head></head><body> ok</body></html> Codice:
Dim oggetto As New MSHTML.HTMLDocument
Dim documento As MSHTML.HTMLDocument
Set documento = oggetto.createDocumentFromUrl(sURL, vbNullString)
Do While documento.ReadyState <> "complete"
DoEvents
Loop
GetURLSource = documento.documentElement.outerHTML
Set documento = Nothing
Set oggetto = Nothing
Codice:
'prendo l'handle della connessione corrente
lSession = InternetOpen("vb wininet", 1, vbNullString, vbNullString, 0)
'prendo l'handle dell'URL
If lSession Then
lInternet = InternetOpenUrl(lSession, sURL, vbNullString, 0, IF_NO_CACHE_WRITE, 0)
End If
'se c'è l'handle dell'URL passo alla lettura della pagina
If lInternet Then
Call InternetReadFile(lInternet, sBuffer, BUFFER_LEN, lReturn)
sData = sBuffer
Do While lReturn <> 0
Call InternetReadFile(lInternet, sBuffer, BUFFER_LEN, lReturn)
sData = sData + Mid$(sBuffer, 1, lReturn)
Loop
End If
'chiudo l'URL
Call InternetCloseHandle(lInternet)
GetURLSource = Replace(sData, Chr(0), "")
|
|
|
|
29-03-2013, 18:25
|
#2 |
|
Junior Member
Iscritto dal: Mar 2013
Messaggi: 11
|
nessuno sa aiutarmi? almeno capire se è una impostazione sul server, un problema vb6 o php...
|
|
|
|
|
29-03-2013, 19:34
|
#3 | |
|
Senior Member
Iscritto dal: Oct 2005
Messaggi: 3306
|
Quote:
Il server php ti sta restituendo una pagina html che il browser ti visualizza. Il fatto che il contenuto della pagina sia "ok", non significa che tutta la pagina sia costituita esclusivamente dalla stringa "ok". Quello che vedi (scarichi dal server) è il codice html, dopotutto sei stato te che nel codice hai chiesto di mostrarti outerHTML... |
|
|
|
|
|
30-03-2013, 19:31
|
#4 | |
|
Junior Member
Iscritto dal: Mar 2013
Messaggi: 11
|
Quote:
a livello di codice c'è solo ok.. (mi serve solo x capire se c'è connessione tra l'applicativo e il server...) nessun tag... il server mi ritorna (o l'utility mi legge...) anke i tag... com'è possibile? |
|
|
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 01:01.
