Minggu, 08 April 2012

Re: [belajar-access] Re: transferdatabase text

 

Dear Mas Hadis, file accessnya sudah saya terima, tapi tolong dikirimkan
contoh output txt nya juga (yg diinginkannya), biar sekalian yah.

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/
----- Original Message -----
From: "hadis0678" <hadis0678@yahoo.co.id>
To: <belajar-access@yahoogroups.com>
Sent: Saturday, April 07, 2012 1:08 PM
Subject: Bls: [belajar-access] Re: transferdatabase text

dear mas nyong arif..
terimakasih atas bantuannya dengan metode output to. permasalahan yang
timbul selanjutnya adalah ketika harus mengimport file tersebut untuk
ditambahkan dalam database yang baru. mengingat untuk dengan metode output
to nanti juga terdapat garis-garis sebagai pembatas antara field maupun
garis horisontal sebagai pembatas antar record. hal tersebut masih belum
saya pahami bagaimana caranya mengimport file tersebut sehingga ketika masuk
tabel hanya isi record saja dan tidak termasuk garis vertikal dan
horisontalnya. terima kasih

best regards

must hdi s

--- In belajar-access@yahoogroups.com, Nyong Arif <nyong_arif@...> wrote:
>
> Ini Saya coba sertakan contoh export untuk .txt dengan penentuan Folder
> dan Nama File untuk Penyimpanannya...
>
> Btw dalam exprot Format TXT ini saya gunakan Docdm.OutputTo.....
> Kalo Mas Hadi Ingin Pake Prosedur lain silahkan ganti Di Line
> Docmd.outputTo nya....dengan prosedur yang sudah mas hadi buat...
>
>
> Semoga Membantu
>
> Â
>
> Terima Kasih
>
> Salam,
> Syarief Nyong
>
>
>
> ________________________________
> Dari: hadis0678 <hadis0678@...>
> Kepada: belajar-access@yahoogroups.com
> Dikirim: Jumat, 6 April 2012 9:56
> Judul: [belajar-access] Re: transferdatabase text
>
>
> Â
> kepada bang sofyan
>
> mohon maaf bang, ini saya sertakan file mdb.nya. algoritma yang diinginkan
> adalah :
> 1. menentukan folder tempat untuk menyimpan
> 2. transfer text tabel1
> 3. simpan hasil transfer ke folder yang telah ditentukan pada langkah 1
> file yang saya sertakan adalah DBExporthadi.zip
>
> best regards
>
> must hdi s
>
> --- In belajar-access@yahoogroups.com, "hadis0678" <hadis0678@> wrote:
> >
> > dear bang sofyan..
> > sory selalu ngrepotin.. untuk metode dengan ekspor data tersebut sudah
> > saya lakukan dan sudah berhasil. hanya masih pada masalah awal bahwa
> > tujuan eksport telah ditentukan terlebih dahulu dalam savedekspor
> > tersebut. kalau dimungkinkan kepengin seperti yang diberikan mas nyong
> > arif dan berjalan pada acces 2003, dimana kita tentukan dulu lokasi
> > penyimpanan atau buat folder langsung dan selanjutnya baru kita lakukan
> > eksport data dan kita simpan dalam folder tersebut.
> > terima kasih
> >
> > hormat saya
> >
> > must hdis
> >
> > --- In belajar-access@yahoogroups.com, Sofyan Efendi <sofyanefendi@>
> > wrote:
> > >
> > > Dear Mas Hadis,
> > > Kalo sdh coba masih ada error, kirimin zip nya yah... :)
> > >
> > > Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > Sofyan Efendi
> > > http://imopi.wordpress.com/
> > > ----- Original Message -----
> > > From: "hadis0678" <hadis0678@>
> > > To: <belajar-access@yahoogroups.com>
> > > Sent: Thursday, April 05, 2012 1:35 PM
> > > Subject: [belajar-access] Re: transferdatabase text
> > >
> > >
> > > > oo.. gitu ya mas..
> > > > jadi kita lakukan ekspor dengan fungsi begitu.. ok langsung ke tkp
> > > > mas.
> > > > terima kasih
> > > >
> > > > best regards
> > > >
> > > > must hdis
> > > >
> > > > --- In belajar-access@yahoogroups.com, Sofyan Efendi <sofyanefendi@>
> > > > wrote:
> > > >>
> > > >> Hmm... Bagaimana bila seluruh procedure diganti menjadi:
> > > >>
> > > >> Function test()
> > > >> DoCmd.OpenTable "NamaTable"
> > > >> DoCmd.RunCommand acCmdExportText
> > > >> DoCmd.Close acTable, "NamaTable"
> > > >> End Function
> > > >>
> > > >> Nama Table boleh diganti menjadi Nama Query ....
> > > >> Cara ini lebih mudah, atau teman2 ada yg hendak menambahkan,
> > > >> dipersilahkan
> > > >> ya...
> > > >>
> > > >> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > >> Sofyan Efendi
> > > >> http://imopi.wordpress.com/
> > > >> ----- Original Message -----
> > > >> From: "hadis0678" <hadis0678@>
> > > >> To: <belajar-access@yahoogroups.com>
> > > >> Sent: Thursday, April 05, 2012 11:24 AM
> > > >> Subject: [belajar-access] Re: transferdatabase text
> > > >>
> > > >>
> > > >> > mohon maaf mas, sudah saya coba. jadi saya membuat
> > > >> > savedeksportnya ke
> > > >> > mydocument. sedangkan diinginkan nantinya bisa menentukan dimana
> > > >> > lokasi
> > > >> > data tersebut dieksport.
> > > >> > sehingga saya ada dua event,yaitu event untuk menentukan lokasi
> > > >> > penyimpanan yaitu :
> > > >> > Dim result As Integer
> > > >> > Dim sFolder As String
> > > >> > With Application.FileDialog(msoFileDialogFolderPicker)
> > > >> > .Title = "Pilih Folder to Export"
> > > >> > .AllowMultiSelect = False
> > > >> > .InitialFileName = CurrentProject.Path
> > > >> > result = .Show
> > > >> >
> > > >> > selanjutnya saya buat event untuk proses eksportdatanya.
> > > >> > eksport data yang saya buat mengarah ke mydocument
> > > >> > On Error GoTo Err_Command45_Click
> > > >> >
> > > >> >
> > > >> > MsgBox "Data disimpan dalam folder " & Text0, vbInformation,
> > > >> > "SIMAKSI
> > > >> > 2012"
> > > >> > DoCmd.RunSavedImportExport "Export-TransferdataSYSDB_PNS889"
> > > >> > MsgBox "Ekspor Data Selesai dan disimpan dalam folder " &
> > > >> > Text0,
> > > >> > vbInformation, "SIMAKSI 2012"
> > > >> >
> > > >> > Exit_Command45_Click:
> > > >> > Exit Sub
> > > >> >
> > > >> > Err_Command45_Click:
> > > >> > MsgBox Err.Description
> > > >> > Resume Exit_Command45_Click
> > > >> >
> > > >> > yang diinginkan adalah hasil savedeksport itu dapat masuk ke
> > > >> > lokasi
> > > >> > yang
> > > >> > telah ditentukan dalam event pertama.
> > > >> > mohon maaf mas sofyan, kalau ngrepotin. terima kasih atas
> > > >> > bantuannya
> > > >> >
> > > >> > best regards
> > > >> >
> > > >> > must hdi s
> > > >> > --- In belajar-access@yahoogroups.com, Sofyan Efendi
> > > >> > <sofyanefendi@>
> > > >> > wrote:
> > > >> >>
> > > >> >> Dear Mas Hadis,
> > > >> >>
> > > >> >> Iya Mas, silahkan dicoba DoCmd.RunSavedImportExport "Nama Saved
> > > >> >> export
> > > >> >> nya"
> > > >> >>
> > > >> >> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > >> >> Sofyan Efendi
> > > >> >> http://imopi.wordpress.com/
> > > >> >> ----- Original Message -----
> > > >> >> From: "hadis0678" <hadis0678@>
> > > >> >> To: <belajar-access@yahoogroups.com>
> > > >> >> Sent: Thursday, April 05, 2012 9:30 AM
> > > >> >> Subject: [belajar-access] Re: transferdatabase text
> > > >> >>
> > > >> >>
> > > >> >> > bang sofyan, mohon maaf maaf kalau untuk menggunakan yang
> > > >> >> > schema
> > > >> >> > masih
> > > >> >> > bermasalah dalam pemahaman hehehe...
> > > >> >> > mungkin untuk saat ini fokus dulu ke transfertext
> > > >> >> > untuk acces 07 ketika saya menggunakan macro untuk eksport
> > > >> >> > text
> > > >> >> > muncul
> > > >> >> > pesan kesalahan delimiter text
> > > >> >> > kemudian saya menggunakan cara ekspor dengan menu eksport data
> > > >> >> > pada
> > > >> >> > ms
> > > >> >> > acces 2007 dan proses eksportnya saya simpan.
> > > >> >> > kemudian saya masuk macro dan saya masukkan proses eksport
> > > >> >> > tersebut
> > > >> >> > dan
> > > >> >> > ini berhasil dilakukan bang. kalau bisa lihat proses
> > > >> >> > eksportnya itu
> > > >> >> > ada
> > > >> >> > dimana ya bang, biar saya ambil syntaknya kemudian saya
> > > >> >> > tuliskan
> > > >> >> > saja
> > > >> >> > di
> > > >> >> > event. sehingga nanti bisa saya kombinasikan dengan syntak
> > > >> >> > dari mas
> > > >> >> > nyong
> > > >> >> > arif.
> > > >> >> > begitu bang, mohon penjelasan
> > > >> >> >
> > > >> >> > best regards
> > > >> >> >
> > > >> >> > must hdi s
> > > >> >> > --- In belajar-access@yahoogroups.com, Sofyan Efendi
> > > >> >> > <sofyanefendi@>
> > > >> >> > wrote:
> > > >> >> >>
> > > >> >> >> :) Wah Kang, kita belajar bersama saja dimilis ini, tapi bila
> > > >> >> >> hendak
> > > >> >> >> silaturahmi, silahkan, rumah saya insya Allah terbuka bagi
> > > >> >> >> sahabat2
> > > >> >> >> yang
> > > >> >> >> hendak silaturahmi.
> > > >> >> >> Belajar harus sedikit2, dari yg termudah, yg sederhana...
> > > >> >> >> tidak
> > > >> >> >> bisa
> > > >> >> >> langsung main ke VBA, dimulai dari table, query, pelajari
> > > >> >> >> dengan
> > > >> >> >> perlahan-lahan, jangan tergesa-gesa... Pahami setiap kode,
> > > >> >> >> kenapa
> > > >> >> >> harus
> > > >> >> >> pakai kode ini, apa manfaatnya, dll... Nanti lama2 insya
> > > >> >> >> Allah akan
> > > >> >> >> hapal,
> > > >> >> >> setiap ada kasus, akan terpikir bagaimana solusinya...
> > > >> >> >> Subhanallah
> > > >> >> >> wal
> > > >> >> >> hamdulillah....
> > > >> >> >>
> > > >> >> >> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > >> >> >> Sofyan Efendi
> > > >> >> >> http://imopi.wordpress.com/
> > > >> >> >> ----- Original Message -----
> > > >> >> >> From: "hadis0678" <hadis0678@>
> > > >> >> >> To: <belajar-access@yahoogroups.com>
> > > >> >> >> Sent: Wednesday, April 04, 2012 5:07 PM
> > > >> >> >> Subject: [belajar-access] Re: transferdatabase text
> > > >> >> >>
> > > >> >> >>
> > > >> >> >> > ok bang sofyan..
> > > >> >> >> > ini perlu belajar lebih keras lagi, ni atau perlu langsung
> > > >> >> >> > ketemu
> > > >> >> >> > dengan
> > > >> >> >> > suhunya ya hehehe..
> > > >> >> >> > ada program pelatihan di rumah acces indonesia untuk
> > > >> >> >> > program ini
> > > >> >> >> > bang
> > > >> >> >> > sofyan? perlu belajar langsung nih ..
> > > >> >> >> >
> > > >> >> >> > terima kasih
> > > >> >> >> > best regards
> > > >> >> >> > must hdis
> > > >> >> >> >
> > > >> >> >> > --- In belajar-access@yahoogroups.com, Sofyan Efendi
> > > >> >> >> > <sofyanefendi@>
> > > >> >> >> > wrote:
> > > >> >> >> >>
> > > >> >> >> >> Ya Kang Hadis, satu kali centang maka file tersebut sudah
> > > >> >> >> >> terkait
> > > >> >> >> >> ke
> > > >> >> >> >> ADO
> > > >> >> >> >> untuk selamanya, jadi nanti tidak perlu maen
> > > >> >> >> >> centang-centangan
> > > >> >> >> >> lagi
> > > >> >> >> >> di
> > > >> >> >> >> unit-unit kerja di wilayah kabupaten klaten.... Saya
> > > >> >> >> >> melakukan
> > > >> >> >> >> proses
> > > >> >> >> >> import
> > > >> >> >> >> export dengan beberapa cara,... ada yg pakai schema.ini,
> > > >> >> >> >> dao,
> > > >> >> >> >> ado,
> > > >> >> >> >> transfer
> > > >> >> >> >> database. Tapi saya suka yg pakai schema.ini, tapi yg dao
> > > >> >> >> >> suka
> > > >> >> >> >> juga
> > > >> >> >> >> sih,
> > > >> >> >> >> soalnya kalo "dao" dibalik jadi "doa", biar inget ama
> > > >> >> >> >> Tuhan ....
> > > >> >> >> >> :-))
> > > >> >> >> >>
> > > >> >> >> >> Kalau Kang Hadis mau, pake schema.ini aja Kang. Saya dulu
> > > >> >> >> >> pernah
> > > >> >> >> >> buat
> > > >> >> >> >> contoh
> > > >> >> >> >> nya, ini saya kirim ulang yah...
> > > >> >> >> >>
> > > >> >> >> >> Petunjuk: Harap diextract seluruh file yg saya kirimkan
> > > >> >> >> >> ini
> > > >> >> >> >> dalam
> > > >> >> >> >> satu
> > > >> >> >> >> folder yang sama. Dalam mengimport table harus disiapkan
> > > >> >> >> >> dahulu
> > > >> >> >> >> file
> > > >> >> >> >> Schema.ini dalam folder tsb. Saya sudah sertakan file dan
> > > >> >> >> >> teorinya
> > > >> >> >> >> pada
> > > >> >> >> >> contoh ini. Silahkan dipelajari ya file
> > > >> >> >> >> ImportDanExportTextFile.mdb...
> > > >> >> >> >>
> > > >> >> >> >> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > >> >> >> >> Sofyan Efendi
> > > >> >> >> >> http://imopi.wordpress.com/
> > > >> >> >> >> ----- Original Message -----
> > > >> >> >> >> From: "hadis0678" <hadis0678@>
> > > >> >> >> >> To: <belajar-access@yahoogroups.com>
> > > >> >> >> >> Sent: Wednesday, April 04, 2012 4:15 PM
> > > >> >> >> >> Subject: [belajar-access] Re: transferdatabase text
> > > >> >> >> >>
> > > >> >> >> >>
> > > >> >> >> >> > tengkyu bang sofyan
> > > >> >> >> >> > kalau begitu mungkin nanti timbul masalah lagi bang.
> > > >> >> >> >> > aplikasi ini akan disebar di unit-unit kerja di wilayah
> > > >> >> >> >> > kabupaten
> > > >> >> >> >> > klaten
> > > >> >> >> >> > jika harus mengecek apakah sudah diaktifkan, mungkin
> > > >> >> >> >> > nanti
> > > >> >> >> >> > malah
> > > >> >> >> >> > tidak
> > > >> >> >> >> > efektif ya bang, karena sumber daya manusia di unit unit
> > > >> >> >> >> > kerja
> > > >> >> >> >> > kan
> > > >> >> >> >> > tidak
> > > >> >> >> >> > sama dan tidak mungkin malah membingungkan hehehe...
> > > >> >> >> >> > ada saran bang, kalau menggunakan transfertext itu
> > > >> >> >> >> > kelihatannya
> > > >> >> >> >> > lebih
> > > >> >> >> >> > sederhana tapi mungkin masalah di delimiter itu ya...
> > > >> >> >> >> > terima kasih
> > > >> >> >> >> >
> > > >> >> >> >> > best regards
> > > >> >> >> >> >
> > > >> >> >> >> > must hdi s
> > > >> >> >> >> >
> > > >> >> >> >> > --- In belajar-access@yahoogroups.com, Sofyan Efendi
> > > >> >> >> >> > <sofyanefendi@>
> > > >> >> >> >> > wrote:
> > > >> >> >> >> >>
> > > >> >> >> >> >> Dear Mas Hadis,
> > > >> >> >> >> >>
> > > >> >> >> >> >> Tolong dicek dulu di reference VBA nya, apakah sudah
> > > >> >> >> >> >> ditambahkan
> > > >> >> >> >> >> Active X
> > > >> >> >> >> >> ADO : Microsoft ActiveX Data Objects
> > > >> >> >> >> >>
> > > >> >> >> >> >> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > > >> >> >> >> >> Sofyan Efendi
> > > >> >> >> >> >> http://imopi.wordpress.com/
> > > >> >> >> >> >> ----- Original Message -----
> > > >> >> >> >> >> From: "hadis0678" <hadis0678@>
> > > >> >> >> >> >> To: <belajar-access@yahoogroups.com>
> > > >> >> >> >> >> Sent: Wednesday, April 04, 2012 3:51 PM
> > > >> >> >> >> >> Subject: [belajar-access] Re: transferdatabase text
> > > >> >> >> >> >>
> > > >> >> >> >> >>
> > > >> >> >> >> >> > dear Bang Haer,
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > saya mencoba menggunakan transfer text, dan ada
> > > >> >> >> >> >> > masalah
> > > >> >> >> >> >> > apabila
> > > >> >> >> >> >> > menggunakan windows7, untuk itu saya coba dengan
> > > >> >> >> >> >> > metode
> > > >> >> >> >> >> > ADO.
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > saya mencoba menggunakan ADO sehingga menjadi :
> > > >> >> >> >> >> > Private Sub Command64_Click()
> > > >> >> >> >> >> > MsgBox "Data disimpan dalam folder " & Text0,
> > > >> >> >> >> >> > vbInformation,
> > > >> >> >> >> >> > "SIMAKSI
> > > >> >> >> >> >> > 2012"
> > > >> >> >> >> >> > DoCmd.RunMacro
> > > >> >> >> >> >> > "macrobikintabelesksporsydbpnsdetail"
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > 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 ----->>> error
> > > >> >> >> >> >> > menjadi
> > > >> >> >> >> >> > merah
> > > >> >> >> >> >> > sql = "SELECT * FROM TransferdataSYSDB_PNS"
> > > >> >> >> >> >> > rs.Open sql, cn, adOpenKeyset, adLockOptimistic
> > > >> >> >> >> >> > Open CurrentProject.Path & "\" &
> > > >> >> >> >> >> > TransferdataSYSDB_PNS &
> > > >> >> >> >> >> > ".TXT"
> > > >> >> >> >> >> > For
> > > >> >> >> >> >> > Input
> > > >> >> >> >> >> > As #1
> > > >> >> >> >> >> > While Not EOF(1)
> > > >> >> >> >> >> > Line Input #1, str
> > > >> >> >> >> >> > rs.AddNew
> > > >> >> >> >> >> > rs!Field1= ----------->>>> error menjadi merah
> > > >> >> >> >> >> > rs.Update
> > > >> >> >> >> >> > Wend
> > > >> >> >> >> >> > rs.Close
> > > >> >> >> >> >> > Close #1
> > > >> >> >> >> >> > End Sub
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > dari syntak diatas terdapat dua error bang, kira-kira
> > > >> >> >> >> >> > apa
> > > >> >> >> >> >> > ya
> > > >> >> >> >> >> > yang
> > > >> >> >> >> >> > kurang/salah dari syintak saya.. terima kasih
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > best regards
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > must hdi s
> > > >> >> >> >> >> > --- 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
> > > >> >> >> >> >> >> >
> > > >> >> >> >> >> >>
> > > >> >> >> >> >> >
> > > >> >> >> >> >> >
> > > >> >> >> >> >> >
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > ------------------------------------
> > > >> >> >> >> >> >
> > > >> >> >> >> >> > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >> >> >> >> >> >
> > > >> >> >> >> >> >
> > > >> >> >> >> >> >
> > > >> >> >> >> >>
> > > >> >> >> >> >
> > > >> >> >> >> >
> > > >> >> >> >> >
> > > >> >> >> >> >
> > > >> >> >> >> > ------------------------------------
> > > >> >> >> >> >
> > > >> >> >> >> > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >> >> >> >> >
> > > >> >> >> >> >
> > > >> >> >> >> >
> > > >> >> >> >>
> > > >> >> >> >
> > > >> >> >> >
> > > >> >> >> >
> > > >> >> >> >
> > > >> >> >> > ------------------------------------
> > > >> >> >> >
> > > >> >> >> > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >> >> >> >
> > > >> >> >> >
> > > >> >> >> >
> > > >> >> >>
> > > >> >> >
> > > >> >> >
> > > >> >> >
> > > >> >> >
> > > >> >> > ------------------------------------
> > > >> >> >
> > > >> >> > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >> >> >
> > > >> >> >
> > > >> >> >
> > > >> >>
> > > >> >
> > > >> >
> > > >> >
> > > >> >
> > > >> > ------------------------------------
> > > >> >
> > > >> > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >> >
> > > >> >
> > > >> >
> > > >>
> > > >
> > > >
> > > >
> > > >
> > > > ------------------------------------
> > > >
> > > > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >
> > > >
> > > >
> > >
> >
>

------------------------------------

SPAM IS PROHIBITEDYahoo! Groups Links

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

__,_._,___

Tidak ada komentar:

Posting Komentar