mas akbar, ini urlnya : http://groups.yahoo.com/group/Programmer-VB/files/Hammet/ZipFiles.zip
--- In [email protected], [EMAIL PROTECTED] wrote: > > > > Mas saya gak bisa masuk yahoogroups untuk download file yang anda kirim > ada alamat FTP nya ga biar saya bisa download ? > > thank's a lot > > best regard > > den_aly > > > > > "destroyer_maniac" > <[EMAIL PROTECTED] To: Programmer- [EMAIL PROTECTED] > ahoo.co.id> cc: > Sent by: Subject: [Programmer-VB] Re: Transfer Data dari DBF ke SQLServer > Programmer- [EMAIL PROTECTED] > groups.com > > > 04/11/2006 01:03 PM > Please respond to > Programmer- VB > > > > > > silahkan download di folder hammet pada millist ini mengenai men- Zip > files dalam folder. > > > > --- In [email protected], Febriyanno Suryana > <surya_gsc@> wrote: > > > > masalah coding DBF-->SQL nya dah kelar.. makasih semuanya.. > > nambah pertanyaan lg nihh.. > > Gimana coding kolo kita mo zip file dalam suatu folder mis : > dari folder A ke folder B dg vb ? dan secara otomatis isi folder A > yg telah di zip td pindah ke folder B > > > > destroyer_maniac <destroyer_maniac@> wrote: > > ini rumus SQL untuk mengimport data DBF ke SQL SERVER. > > > > Rumus Pertama : > > > > "insert into [NmTabel](Field1,NmField2,NmField3) SELECT > > Field1,NmField2,NmField3 FROM OpenDataSource > > ('Microsoft.Jet.OLEDB.4.0','Data Source=G:\rifa;User > > ID=Admin;Password=;Extended properties=DBASE IV')...NamaFileDBF" > > > > Rumus KE 2(Jika Susunan Field Tabel yang di SQLSERVER telah sama > > dengan Susunan Field yang ada di DBF): > > > > "insert into [NmTabel] SELECT * FROM OpenDataSource > > ('Microsoft.Jet.OLEDB.4.0','Data Source=G:\rifa;User > > ID=Admin;Password=;Extended properties=DBASE IV')...NamaFileDBF" > > > > > > Praktek untuk lebih jelas Ke VB NYa : > > > > > > Dim cn As New ADODB.Connection > > > > Private Sub Import() > > > > If cn.State = 1 Then cn.Close > > cn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User > > ID=sa;pwd=rm;Initial Catalog=SQL;Data Source=SERVER" > > > > cn.CursorLocation = adUseClient > > > > cn.Execute "insert into [NamaTabel] SELECT * FROM OpenDataSource > > ('Microsoft.Jet.OLEDB.4.0','Data Source=G:\rifa;User > > ID=Admin;Password=;Extended properties=DBASE IV')...Penjualan" > > > > End Sub > > > > > > > > > > > > > > Wahana Programmer Groups Links > > > > > > > > > > > > > > > > --------------------------------- > > YAHOO! GROUPS LINKS > > > > > > Visit your group "Programmer-VB" on the web. > > > > To unsubscribe from this group, send an email to: > > [EMAIL PROTECTED] > > > > Your use of Yahoo! Groups is subject to the Yahoo! Terms of > Service. > > > > > > --------------------------------- > > > > > > > > > > > > --------------------------------- > > Yahoo! Messenger with Voice. Make PC-to-Phone Calls to the US (and > 30+ countries) for 2?/min or less. > > > > > > > > > > Wahana Programmer Groups Links > > > > > Yahoo! Groups Links > Wahana Programmer Groups Links <*> Untuk mengunjungi sponsor milis ini, klik link berikut: http://wahanaprogrammer.net <*> Untuk menghubungi owner milis ini, kirim email ke: [EMAIL PROTECTED] <*> Konsultasi pemrogramman bisa chat disini: Yahoo! Messenger: wahanaprogrammer Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/Programmer-VB/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
