Newsgroup: it.comp.lang.visual-basic
Titolo: un collegamento ad internet

Ho sviluppato un programmino e vorrei aggiungere una funzione.
Vorrei, tramite un pulsante o una stringa contenente il sito da visitare,
attivare il collegamento ad internet e in particolare aprire un sito da me
scelto.
Oltre a questo vorrei anche avere il collegamento con la posta elettronica
aprendo il programma di posta predefinito e indirizzarlo all'indirizzo che
scrivero' sulla form.
Spero di essermi spiegata nel migliore dei modi.
GRAZIE 1000 a tutti!!!
Daniela

 wrote

'dichiarazioni, in un bas:
Public Const SW_SHOWNORMAL = 1
Declare Function ShellExecute Lib "shell32" _
Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) _
As Long
'uso, p.e. da una toolbar:
Private Sub tb_ButtonClick(ByVal Button As ComctlLib.Button)
Dim iRet As Long, sUrl As String
Select Case Button.Key
Case "about":
sUrl = "
http://www.comune.modena.it/cittadini/apal/
"
iRet = ShellExecute(Me.hwnd, vbNullString, _
sUrl, vbNullString, "c:\", SW_SHOWNORMAL)
Case "exit": Unload Me
Case "mail":
sUrl = "mailto:
xd...@zelig.it
?subject=about e"
iRet = ShellExecute(Me.hwnd, vbNullString, _
sUrl, vbNullString, "c:\", SW_SHOWNORMAL)
Case "xday":
sUrl = "
http://members.xoom.it/xday/
"
iRet = ShellExecute(Me.hwnd, vbNullString, _
sUrl, vbNullString, "c:\", SW_SHOWNORMAL)
End Select
End Sub
hth, pal
--
andrea dot palazzi at tin dot it
xday at libero dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

Cosě non va bene? A me funziona benissimo. Qual'č la differenza con quanto
scritto da Pal?
'spedisce E-mail
    Shell "start mailto:
cen...@libero.it
", 0
'lancia il browser di default
    Shell "start 
http://digilander.iol.it/cesare/
", 0
Ciao a tutti
Cesare Nicola
http://digilander.iol.it/cesare
L'indirizzo del sito comune č:
http://www.murialdo.it:8000/it_lang_vb/

cen...@tiscalinet.it
 (Cesare Nicola) ha scritto:

Penso che se tu scrivi in questo modo Windows NT non lo riconosca. Infatti 
credo che il comando "start" non sia supportato.
Andrea Fontana
E-Mail:andrea...@mail.com
ICQ#: 27799781

 che differenze ci sono, in sostanza oltre che in teoria :) ?
Shell e' una funzione di VB. In pratica la chiamata viene mappata sull'API
(non so dirti se su ShellExecute o CreateProcess, ma propenderei per la
seconda)
PRO: e' molto probabile che rimanga uguale anche nel caso di modifiche
all'API (e' in pratica un "layer" di isolamento dalle funzioni del sistema
operativo). E' semplice da usare.
CONTRO: a me ha dato parecchi problemi e credo che cio' sia dovuto a
limitazioni nella sua implementazione.
ShellExecute (e/o ShellExecuteEx) e' una funzione dell'API di Windows.
PRO: essendo una funzione del S.O., piu' flessibile/potente di cosi non si
puo' avere.
CONTRO: potrebbe essere eliminata/modificata in future versioni di Windows
(ma forse per allora non esistera' piu' nemmeno VB, cosi' ci togliamo di
mezzo 2 problemi in un colpo solo :-) E' piu' complessa rispetto a Shell.

non sapevo questa cosa di nt.
Che il comando "start" su NT (almeno sulla vers. 4.0) funzioni e' una
certezza, tranquillo.
Cmq anche io sono solito usare ShellExecute.
In questi casi poi, fai a meno di richiamare l'eseguibile "start".
--
C'ya,
 Benjamin Reilly
  |
  |
'/|\'
\\O//
//"\\
'\ /'
________________________________________TagLine___
"Quanti Angeli danzano sulla punta di uno spillo?"




 per intenderci (tra l'altro, non è nemmeno un programa di DOS)
non ne sono sicurissimo, ma mi sembra che start ci fosse gia' nella prima
versione di w95.
non mi ricordo se fosse in \win\command, ma direi che per lanciare un prg
c'era l'opzione (da esegui o da finestra dos) "start winword" o simili.

io ho provato adesso adesso e vi assicuro che il comando start funziona
anche su windows NT4.
ciao.