Newsgroup: it.comp.lang.visual-basic
Titolo: salvare il contenuto di una finestra in un file

una volta "individuata" una finestra attraverso EnumWindows, nella procedura
callback (si chiama cosě?) dovrei controllare il titolo di questa finestra,
e, se risulta uguale ad un certo valore di testo, salvare il contenuto della
finestra in un file, ossia l'equivalente di File... Salva con nome...
la domanda č: che messaggio devo inviare per fare ciň?
grazie
mario

la finestra è una finestra di Internet Explorer o Netscape Navigator.
aiutatemi, please
mario

 aiutatemi, please
caricala in un webbrowser e salvane il contenuto.
non chiedermi come, non l'ho mai usato, ma se cerchi nei vecchi post o in
deja "webbrowser" dovresti trovarlo. eventualmente usa f2.
ciao, a.

 non chiedermi come, non l'ho mai usato
... figurati io... vabbe... ora provo...
grazie 1000
mario

tenendo presente che io della programmazione per internet non so niente,
dovrei imparare daccapo completamente il controllo web browser... č cosě???
poi mi sembra di aver capito che funziona solo con IE e non con netscape.
azzardo un'ipotesi (sicuramente sbagliata). se uno ha l'handle di una
finestra (IE o netscape che sia), questa finestra ha un contenuto, giusto?
che in ogni caso puo essere "ridotto" o letto in formato testo, giusto?
bene, se uno leggesse pezzo pezzo questo contenuto in formato testo, e poi
lo salvasse (con l'api WriteFile) in un file (chessň) formato .htm, si
sarebbe ottenuto lo stesso scopo. me la domanda č: č o no possibile (via
Api), dato l'handle di una finestra, andare a leggere quello che c'č scritto
dentro?
boh...
mario

 anche il codice html corrispondente???


mica tanto pazzesche... e poi davvero non ho idea di come leggere il
contenuto di una finestra, senza usare webbrowser. tanto piů che questa
operazione non dovrebbe avvenire necessariamente quando uno č in rete,
quindi sicuramente c'č un metodo per sapere cosa contiene una finestra... un
metodo piu "ortodosso".
se qualcuno lo conosce... che sputi il rospo!!!!!!!
bye
mario

 ha scritto

e possibilmente lo tramuti in una principessa...

che in ogni caso puo essere "ridotto" o letto in formato testo, giusto?
sbagliato... GetWindowText funziona su quasi tutte le finestre standard,
NON le edit (non quelle che non siano della tua applicazione), e i frame di
visualizzazione di Netscape e Internet Explorer NON sono nemmeno finestre
standard (nemmeno supportano le funzioni standard di selezione/copia)
Pal ti consiglia il WebBrowser, tu poni il problema Netscape, io rilancio
dicendo "Mozilla NG Layout Control", PERFETTAMENTE (quasi ;) compatibile
con il WebBrowser (trovi anche un programma che sostituisce all'interno di
eseguibili compilati il GUID del webBrowser con quello del Mozilla Layout,
e pare che funzioni), ma usa il motore di rendering di Mozilla (la versione
non-commerciale di Netscape 6, nonchè lontano cugino di Internet Explorer).
Lo trovi, pare uno scherzo, qui: 
www.mozilla.org
. Allora, ignoro
completamente - vergogna - il progId del Mozilla Layout, supponiamo che sia
"Moz.Layout", nonchè il nome dell'oggetto WebBrowser, se non altro conosco
il progId del WebBrowser (che non serve). Per scegliere quale caricare,
prova: 
WithEvents webBrowser as WebBrowser 'spero
Dim moz as Object
Dim wantMoz as Boolean
On Error Resume Next
Set moz = CreateObject("Moz.Layout")
'Cio' che segue e' a vostro rischio e pericolo!
'Ignoro:
' - se la memoria allocata per webBrowser venga deallocata
' - se la cosa funzioni, ossia se il Mozilla Layout sia abbastanza
'   compatibile per farci una simile acrobazia...
'Garantisco:
' - almeno un crash (di quelli brutti - Blue Screen Of Death™ o peggio)
' - travasi di bile ad libitum
'
'L'"acrobazia" e' dovuta al fatto che VB non permette di riassegnare un
'riferimento ad un oggetto dichiarato con WithEvents. E al fatto che il
'webBrowser fa parte di Windows, il Mozilla Layout e' un componente di terze
'parti che piu' di terze parti non si puo'
If wantMoz And moz Then
    SwapObjects webBrowser, moz
End If
'qui potrebbe crashare
Set moz = Nothing
Sub SwapObjects(objDest As Object, objSource as Object)
    Dim objInTheMiddle As Object, lenObj As Long, ptrs(3) as Long
    'tutti gli oggetti hanno la stessa lunghezza
    lenObj = LenB(objInTheMiddle)
    'copiamo i puntatori agli oggetti in modo da non dovervi accedere in
    'seguito, per minimizzare le possibilita' di crash...
    ptrs(0) = ObjPtr(objDest)
    ptrs(1) = ObjPtr(objSource)
    ptrs(2) = ObjPtr(objInTheMiddle)
    'scambiamo i due oggetti
    CopyMemory ptrs(0), ptrs(1), lenObj
    CopyMemory ptrs(1), ptrs(2), lenObj
    CopyMemory ptrs(2), ptrs(0), lenObj
    'distruggiamo l'oggetto temporaneo - sperando che non crashi qui
    Set objInTheMiddle = Nothing
End Sub
PS
Preciso che NON mi sono svegliata presto, ma che piuttosto NON sono ANCORA
andata a dormire e non credo ci andrò... quindi siate clementi

 ' - almeno un crash (di quelli brutti - Blue Screen Of DeathT o peggio)



ma è tragico!!!!!!!!!!
solo una curiosità. ma la GetWindowsText in realtà restituisce SOLTATNTO il
testo contenuto nella barra del titolo... vero?
mario

automatismi del cappero...
figurati... ti sarai confuso con qualcun altro del klan

 figurati... ti sarai confuso con qualcun altro del klan
bene.
ringrazio il cielo che codesto klan abbia un J fra i due K...
pero' mi spieghi cos'e' kjk plz ?
in mail se kmetrico :)

...(...)...
sembrerebbe che Juliet sia un metodo della classe KJK ...
oops, non dovevo ?
:-)
Ciao
Aldo

pero' mi spieghi cos'e' kjk plz ?
Kyle Jordan Klan
in realtà non esiste, ma non dirlo a nessuno :)
abbiamo solo in comune un proxy di posta e news e un server FTP gestiti da 
un/a gentile volontario/a :)
("... e di più non dimandare")

sembrerebbe che Juliet sia un metodo della classe KJK ...
Juliet una classe del namespace KJK, piuttosto :)
sennň si scriveva KJK->Juliet()

 wrote in message
news:Xns9019E4...@127.0.0.1...

adesso comincia ad avere piu' senso;
manca l' identificazione del namespace :-)