Wow mantap Master, mengingat data saya bisa sampai 50 field dan jumlah
recordnya mencapai ribuan..
Mudah-mudahan dengan database MySQL, proses makro bisa lebih cepat dan tidak
sering error karena tabrakan dengan pengguna lain dalam jaringan lokal.
Terima kasih banyak Mr. Kid.. senang bisa bergab
eh ada yang kurang s di Exist.
tertulis :
sQuery="INSERT INTO user (id,pemakai,pass) VALUES (17,'kid','BeExcel')
WHERE NOT EXIST (SELECT id FROM user WHERE id=17);"
harusnya :
sQuery="INSERT INTO user (id,pemakai,pass) VALUES (17,'kid','BeExcel')
WHERE NOT EXIST*S* (SELECT id FROM user WHERE id=17
Wa'alaikumussalam Wr. Wb.
wow selamat ya...
kalau mau coba script berikut :
dim conn as adodb.connection
dim rs as adodb.recordset
dim sConn as string, sQuery as string
set conn=new adodb.connection
sconn="DRIVER={MySQL ODBC 5.2w Driver}" & _
";SERVER= localhost" & _
";database= database_ho"
Assalamualaikum..
Horee.. berhasil Master..
Taunya query nya seperti ini :
strsql = SELECT COUNT(pass) as pass_count FROM user
rs.open strsql, conn
rs.MoveFirst
If rs.fields ("pass_count") > 0 Then
MsgBox "Data Ada"
Else
MsgBox "Data Tidak Ada"
oh kalau gitu coba :
SELECT pass FROM `user`
karakter ` bisa ditemukan dibawah karakter tilde (~) yang tombolnya acap
kali ditemukan di sebelah kiri tombol angka 1 atau tombol tanda seru.
Wassaalamu'alaikum Wr. Wb.
Kid.
On Thu, Apr 18, 2013 at 1:01 AM, Rahmat Hermawan wrote:
> **
>
>
> denga
dengan diberi [user] malah "ODBC Driver not supprt the requested properties"
Master.. tapi sambil tak coba utak-atik deh..
Sebelumnya terimakasih banyak Mr. Kid.
Wassalamualaikum. Wr. Wb..
n komputer berbeda dalam 1 jaringan, setelah
> googling sana-sini sampe hampir stress, Alhamdulillah sudah berhasil..
> hehehe..
>
> Sekali lagi terima kasih yang sebesar-besarnya..
> Wassalam.
> ----------
> *From:* Mr. Kid
> *To:* BeExcel
> *Sent:*
Hai Rahmat,
1. Bagaimana sript vba untuk memasukkan ("C3").Value pada sheet1 ini,
kedalam field "alamat" pada database mysql. Kalau dengan database excel
sendiri kan script intinya Cuma : .Cells(baris, 2) = Sheet1.Range("C3").
(dalam file yang saya lampirkan).
>> Ya betul, untuk kegiatan di Excel
Selamat malam para master excel, saya ingin bertanya :
Saya mempunyai file excel yang saya buat sebagai aplikasi input data (sheet 1)
dan sheet 2 sebagai databasenya menggunakan VBA excel.
(file terlampir).
Saya ingin mengganti penyimpanan databasenya tidak dengan excel lagi, tetapi
dengan data
9 matches
Mail list logo