Grazie mille,
solo che non ho trovato nulla di quello che mi serve.

io un codice di accesso a database su internte l'ho creato solo che al momento in cui vado a compiere una operazione mi da un errore di accesso negato al server rds.

di seguito ti riporto il codice, se vuoi vederlo e fammi sapere se è ok oppure no.

grazie ciao
'''''''''''''''''''''''''''''''''''''
Global cn As New ADODB.Connection
Global appartamenti As New ADODB.Recordset
''''''''''''''''''''''''''''''''''''''
cn.Open "Provider=MS Remote;Data Source=c:\inetpub\indaco\db\arctour.mdb " & _
"Remote Server=http://melchior/indaco"
''''''''''''''''''''''''''''''''''''''''
appartamenti.Open ("select descrizione from appartamenti"), cn
While appartamenti.EOF = False
List1.AddItem appartamenti!descrizione
appartamenti.MoveNext
Wend
'''''''''''''''''''''''''''''''''''''''