Senin, 02 April 2012

[belajar-access] Re: transferdatabase text

 

dear bang sofyan

langsung menuju TKP bang
terima kasih

best regards

hdi susanto

--- In belajar-access@yahoogroups.com, "Sofyan Efendi" <sofyanefendi@...> wrote:
>
> Dear Mas Hadis,
>
> Umumnya, error karena masalah regional settings. Cobalah diubah dari Indonesia ke English, atau sebaliknya. Atau alternatif lainnya, bisa menggunakan metode import text filenya ADO dan DAO, misal:
>
> Contoh Menggunakan ADO:
>
> Private Sub Command0_Click
> Dim str as string
> Dim sql as string
> Dim cn as New ADODB.Connection
> Dim rs as New ADODB.Recordset
>
> set cn as currentproject.connection
> sql = "SELECT * FROM TABLE1"
> rs.open sql,cn,adopenkeyset,adlockoptimistic
> Open CurrentProject.Path & "\" & NamaFileTxt & ".TXT" For Input As #1
> While not EOF(1)
> Line Input #1, str
> rs.AddNew
> rs!Field1=
> rs.Update
> Wend
> rs.close
> Close #1
> End Sub
>
> Contoh Menggunakan DAO:
>
> Private Sub Command0_Click
> Dim str as string
> Dim sql as string
> Dim db as DAO.Database
> Dim rs as DAO.Recordset
>
> set db = currentdb()
> sql = "SELECT * FROM TABLE1"
> set rs = db.openrecordset(sql,dbopendynaset)
> Open CurrentProject.Path & "\" & NamaFileTxt & ".TXT" For Input As #1
> While not EOF(1)
> Line Input #1, str
> rs.AddNew
> rs!Field1=
> rs.Update
> Wend
> set rs=nothing
> Close #1
> End Sub
>
> Kedua contoh diatas adalah import data dari txt file ke Table di Ms Access.
>
> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> Sofyan Efendi
>
> --- In belajar-access@yahoogroups.com, "hadis0678" <hadis0678@> wrote:
> >
> > mohon bantuan para suhu semua mengenai tranfer database
> >
> > saya sedang membangun aplikasi dengan acces 2003 dan untuk transferdatabase menggunakan yang transferdatabase text yang dibuat dengan makro. makro tersebut bisa berjalan dengan baik pada acces 2003. yang menjadi masalah adalah ketika dijalankan dengan acces 2007, makro tersebut tidak berjalan. komentar yang muncul adalah text file specification field separator matches decimal separator or text delimiter.
> >
> > mohon bantuan
> >
> > best regards
> >
> > hdi s
> >
>

__._,_.___
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar