Terima kasih banyak mas Pupunk,
programnya jalan

pupunk <[EMAIL PROTECTED]> wrote:
coba kalo pakai ini gmn ?

Set cnn = New ADODB.Connection
cnn.Open "provider=SQLOLEDB.1 ;data source=192.168.0.1\pegasus;" & _
"initial catalog=db_warehouse;persist security info=true;" & _
"user ID=pupunk;password=123;"
cnn.CursorLocation = adUseClient
.