Re: [Programmer-VB] import data

rudi_hs Sun, 11 Jun 2006 21:28:05 -0700

    dim cn as new ADODB.Connection,rs as new ADODB.RECORDSET
    Set cn = New ADODB.Connection
    cn.CursorLocation = adUseClient
    cn.Open "DRIVER={Microsoft Text Driver (*.txt; *.csv)};" & _
                  "DBQ=" & nama file txt lengkap dengan alamat foldernya & " ;", "", ""
    rs.open "select * from [namafile#extension],cn, adOpenStatic, adLockReadOnly, adCmdText

while not rs.eof

sql="insert into table values('" & str(rs(0)) & "')

conn.execute sql,,adcmdtext

wend

ket.

conn adalah koneksi ke Sql Server atau lain nya.

Semoga membantu

Terima Kasih

Rudi Hartono Simamora

Rudi Hartono Simamora
_________________________________
Dept IT
PT Karisma Aksara Mediatama
Jl. Moh. Toha No. 2, Pondok Cabe
Ciputat - Tangerang 15418
Telp. +62 21 7444555 ext. 230
Fax. +62 21 7411084
Email: [EMAIL PROTECTED]
Indonesia

----- Original Message -----

From: indra gunawan

To: [email protected]

Sent: Sunday, June 11, 2006 7:31 PM

Subject: Re: [Programmer-VB] import data

menurut saya stepnya gini :
1. Baca Notepad..
2. Masukin Hasil Bacaan ke dalam List View..
3. Bikin tombol untuk masukin ke SQL
4. Gunakan Val(colum A) pada saat masukinnya

----- Original Message -----
From: "pupunk" <[EMAIL PROTECTED]com>
To: <programmer-vb@yahoogroups.com>
Sent: Friday, June 09, 2006 1:11 PM
Subject: [Programmer-VB] import data

> dear all,
>
> teman2x, sy punya file txt yg isinya sbb:
> (A) (B)
> 000005421 998754
> 000000541 99751
> 000005555 549812
> 000012546 777541
> dst
>
> nah sy ingin file tsb sy import ke SQL server tapi
khusus utk yg kolom (A)
> angka nol-nya dihilangkan semua shg menjadi sbb:
> (A) (B)
> 5421 998754
> 541 99751
> 5555 549812
> 12546 777541
>
> mohon responds dari teman2x sekalian ya karena
mengingat urgent nih....
> sebelum & sesudahnya sy ucapkan terimakasih
>
> salam,
> pupunk
>

__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

__._,_.___

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

SPONSORED LINKS

`Programmer`	`Indonesia`	`Basic programming language`
`Computer programming languages`	`Programming languages`	`Java programming language`

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.

__,_._,___

Re: [Programmer-VB] import data

Kirim email ke