Dear Sunardi ...
Pertama buka database pake' ADO Connection di VB
Udah itu buat objek recordset, misalnya :
dim TData as Adodb.recordset
dim FILEBEBAS AS INTEGER
set TData = new Adodb.recordset
Udah itu baca record per record dan lakukan cetakan ke file teks, misalnya :
TData.Open "SELECT * FROM NAMA_TABEL",adopenstatic,adopenreadonly
IF NOT TData.EOF THEN
TData.Movefirst
FILEBEBAS = FREEFILE
OPEN "C:\NAMA_FILE.TXT" FOR OUTPUT AS FILEBEBAS
WHILE NOT TData.EOF
PRINT #FILEBEBAS, TDATA![FIELD1] & VBTAB & TDATA![FIELD2]
TDATA.MOVENEXT
WEND
CLOSE #FILEBEBAS
END IF
TDATA.CLOSE
sunardi_kss <[EMAIL PROTECTED]> wrote: dear
programmer vb yg baik hati
saya minta tolong dong buatin program vb untuk transfer database dari
database access 2003 ke dalam text file.
saya pernah membuat tapi dengan menggunakan perintah di access dan
berhasil tapi kelemahannya accessnya harus selalu aktif. mohon solusinya
trima kasih....
---------------------------------
Bergabunglah dengan orang-orang yang berwawasan, di bidang Anda di Yahoo!
Answers
[Non-text portions of this message have been removed]
