3. Interface itu bisa juga disebut contract. Dimana semua class yang menggunakan suatu interface harus mendeklarasikan semua Attribute dan implementasinya.
Biasanya, apabila attribute dan implementasinya tidak di deklarasikan pada suatu class yang memakai interface, akan terjadi error pada saat compile. Regards, Setiawan -----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] Sent: Monday, February 27, 2006 10:09 AM To: [email protected] Subject: Re: tanya dikit .net Hi Johan, Coba jawab ya....... 1. Boxing, process wrapping dari primitif type ke reference type atau yang lebih dikenal dengan istilah object....... 2. Untuk strong name di sebuah assembly diperlukan 4 unsur yaitu : - Name - Key - Culture - Version. 3. Untuk interface, dapat dianalogikan sebagai makanan.......... Semua hewan khan perlu makan, maka kita enggak perlu bikin special class untuk primata, tus another class untuk mamalia, dsb. Cukup bikin 1 interface food yang bisa dipakai untuk mamalia, primata, dsb.... Semoga cukup jelas. Regards, Eko Suharto ----- Original Message ----- From: johan max To: [EMAIL PROTECTED] ; [email protected] Sent: Saturday, February 25, 2006 5:41 PM Subject: [Programmer-VB] tanya dikit .net Salam sejahtera, Saya mau tanya sedikit 1. apa itu boxing (bukan tinju loh) ? Katanya bisa membuat lambat. Gimana cara mencegahnya ? 2. bagaimana membuat strong name di sebuah assembly ? 3. seandainya class dapat dianalogikan dengan taksonomi (hewan -> hewan bertulang belakang & tidak) (hewan bertulang belakang -> ikan-ikanan, reptilia, aves (burung), mamalia) (mamalia -> primata, proboencis) (primata -> kera, orangutan, gorila,manusia) Maka interface dapat dianalogikan dengan apa ? __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com Wahana Programmer Groups Links 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. --------------------------------- --------------------------------- Yahoo! Mail Bring photos to life! New PhotoMail makes sharing a breeze. [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 2 Date: Sun, 26 Feb 2006 14:39:59 -0800 (PST) From: rendra kurniawan <[EMAIL PROTECTED]> Subject: Re: System is Out of Date Makasih mas doni atas informasinya,kalo begitu nanti saya cari SP2 nya karena PC saya menggunakan download otomatis, jadi sy gak tau ditaruh dimana hasil downloadnya.. Boleh kan nanti sy tanya lagi kalo sy ada masalah, tenang mas bukan masalah keuangan kok. Makasih banyak Doni Juana <[EMAIL PROTECTED]> wrote: saya juga pernah mengalami hal yang demikian jadi solusinya kalo PC yang digunakan untuk membuat file setup.exe pada PC yang WinXP SP2 dan akan diinstal pada PC WinXP Sp1 harus diupgrade dulu ke SP2 baru bisa diinstal. semoga sukses. --- rendra kurniawan <[EMAIL PROTECTED]> wrote: > Maaf ya mas2 sekalian, kemarin belum selesai udah ke > sent duluan. > > > Saya baru di dunia programming,mudah2an mas > sys,mas ronald,mas purwedi dan temen2 vb yang > bermurah hati dapat membantu saya... > > Saya menemukan pesan error "System is out of > date.......". Error tersebut tampil saat saya coba > menginstall program vb Setup ke PC lain yang tidak > tersambung internet, sebab PC yg saya gunakan utk > membuat Setup.Exe selalu ter update secara otomatis > karena PC tsb nyambung ke internet. > Apakah saya perlu men download file update tsb ke > microsoft atau ada cara lain utk menanggulangi error > messages tsb. > > Mohon pencerahannya,soalnya agak gelap disini.. > > > > --------------------------------- > Yahoo! Mail > Bring photos to life! New PhotoMail makes sharing a > breeze. __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com Wahana Programmer Groups Links 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. --------------------------------- --------------------------------- Brings words and photos together (easily) with PhotoMail - it's free and works with Yahoo! Mail. [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 3 Date: Sun, 26 Feb 2006 14:49:14 -0800 (PST) From: rendra kurniawan <[EMAIL PROTECTED]> Subject: Re: DBGRID/msjet error Sebenarnya ada dua solusi : 1. Install VB ke komputer yg akan diKopikan program vb anda. Solusi yg kedua : 2. Anda buat installer untuk program yg anda buat,sehingga anda tdk perlu meng install VB ke komputer yg akan anda pakai utk menjalankan program yg anda buat. utk membuat installer, anda dpt menggunakan Package & deployment Bawaan dr VB itu sendiri atau menggunakan Sofware yg lain, contohnya Visual Studio Installer. Selamat mencoba. Rendra Ardhi Adhary Arbain <[EMAIL PROTECTED]> wrote: Salam kenal teman2 milis, Langsung aja ya, gw baru beberapa bulan mendalami VB. Barusan kemarin bikin program VB yang nyambung ke database ms Access. Untuk koneksi databasenya, gw masih pake MSJet, belum make ADO, soalnya gw masih belum terlalu ngerti make ADO ^_^. Setelah dicoba di kompi gw, progam ini jalan. Masalahnya muncul ketika program ini di run di kompi yang lain. Muncul pesan error seperti ini : Class not registered. Looking for object with CLSID:{00000010-0000-0010-8000-00AA006D2EA4} Setelah gw telusuri lewat debug mode, masalahnya muncul ketika program meload object DBGRID. Dugaan gw sih, kalo bukan DBGRID yg error, kemungkinan msjet-nya yang ngaco. Kemarin gw udah coba meng-copy file-file berikut ke kompi ybs dan meregisternya di folder system32 : dbgrid32.ocx msjet35.dll msjter35.dll msjint35.dll Tapi hasilnya masih sama, error. Oya, ada satu lagi temuan gw, ternyata program ini ngaconya kalo di-run di kompi yg nggak ada VBnya, tapi kalo ada VBnya program ini jalan mulus. Kira2 kenapa ya ? Mohon pencerahan. Ardhi Wahana Programmer Groups Links 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. --------------------------------- --------------------------------- Yahoo! Mail Use Photomail to share photos without annoying attachments. [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 4 Date: Mon, 27 Feb 2006 00:15:59 -0000 From: "jamzthaitong" <[EMAIL PROTECTED]> Subject: Program Klinik Mau tau dimana cari Program Atau Source code untuk Klinik Praktek Dokter thank teman2 ________________________________________________________________________ ________________________________________________________________________ Message: 5 Date: Mon, 27 Feb 2006 00:19:03 -0000 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: INFO VIRUS was (Re: Att Ada virus yang masuk ke milis ini) sekali lagi buat semuanya, kita ingatkan u. berhati2 dg email2 yg ber- attachment, terutama yg judulnya ga berbau programming sama sekali. khusus buat mas elka sangara, u. sementara email anda kami buat tidak bisa posting, hanya bisa menerima email dari milis ini. ntar kalau komputernya udah bersih dari virus, silahkan hub moderator u. mengubah status anda. best regards [wwn] --- In [email protected], "akhmadaminullah" <[EMAIL PROTECTED]> wrote: > > > Kepada teman2 semua hati2 ada virus yang masuk sebagian komputer dari > teman2 yang membuka email tersebut sewaktu kirim juga mengikutkan > virus tersebut > > MOHON SCAN VIRUS SEMUA Komputer. > > Anti Virus Saya mendapatkan virus dari email berikut "ekrasangla" > > saya terima email dengan file berupa attachment *.hqx saya nggak > berani membukanya > > kalau teman2 menggunakan pop3 mohon anti virus untuk pop3 nya juga > diaktifkan > > Salam > > Akhmad Aminullah > ________________________________________________________________________ ________________________________________________________________________ Message: 6 Date: Sun, 26 Feb 2006 16:29:06 -0800 (PST) From: Padu Arsana W <[EMAIL PROTECTED]> Subject: Re: Mencari nilai total dari field jumlah,,berdasarkan grouping di CRYSTAL REPORT 7 Hi.. pake aja subtotalnya cr bisa kok. stlh field2 tersebut di insert klik kanan pada field JUMLAH_CUTI, nanti disana ada pilihan subtotal. pilih kemudian tentukan grouping nya berdasarkan field apa. selamat mencoba ya salam, Padu Arsana I Wayan Nusa Penida, Klungkung - Bali robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> wrote: hai teman teman saya punya masalah nih ,,, gimana caranya menghitung total dari field jumlah,,di crystal report 7.0 misalanya saya punya tabel data base seperti ini, dan saya ingin menjumlahkan record pada kolom jumlah berdasarkan grouping pada NIK dan total adalah hasil dari formulanya,,, Gimana yach caranya....kalau ada yang tau pliss dong kasih tau.... APLIKASI PAKE VB 6.0 DAN CR 7.0 NIK TGL JUMLAH_CUTI 1 01/02/2005 1 1 02/02/2005 2 1 15/02/2006 3 TOTAL 6 2 01/02/2005 1 2 05/02/2005 2 2 15/02/2005 1 TOTAL 4 --------------------------------- Apakah Anda Yahoo!? Kunjungi halaman depan Yahoo! Indonesia yang baru! Wahana Programmer Groups Links 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. --------------------------------- --------------------------------- Yahoo! Mail Bring photos to life! New PhotoMail makes sharing a breeze. [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 7 Date: Mon, 27 Feb 2006 08:33:41 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: Bagaimana agar spasi ditengah tidak terbaca? buat alternatif aja, mas bisa pake fungsi replace nya vb. Dim s as string s = "123 456" s = Replace(s, Chr(32), "", , , vbTextCompare) best regards [wwn] On 2/25/06, b-l wiwit <[EMAIL PROTECTED]> wrote: > > > mungkin pake kayak gini bisa mas > > dim i as integer,tmp as string > tmp = "":cekno = "" > for i = 1 to len(text1.text) > tmp = mid(text1.text,i,1) > if tmp <> " " then cekno = cekno & tmp > next > > > semoga membantu > > thanks, PusHm0v > [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 8 Date: Mon, 27 Feb 2006 08:40:53 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: [OOT]: ASP.NET ..net framework + web server (mis: iis) buat IDE nya bisa pake visual studio .net, web matrix, atau notepad dll. best regards [wwn] On 2/26/06, dale habiby <[EMAIL PROTECTED]> wrote: > > > > temen2 semua, aku lagi belajar asp.net, > untuk menjalankan asp.net apa aja yg harus di install? > mohon penjelasannya! > > > > terima kasih [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 9 Date: Mon, 27 Feb 2006 09:14:05 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: DBGRID/msjet error seperti kata teman2, mas ardhy coba buat installernya, paling ga sekali aja diinstall di komputer lain itu, setelah itu biasanya kalau ga ada penambahan komponen, cukup dikopi file exenya udah bisa jalan. sedikit pelurusan msjet itu hanyalah driver yg digunakan u. ngakses ms-access database, sedangkan pengolahan datanya di vb pasti menggunakan salah satu dari 3 metode ini, DAO, RDO atau ADO. jadi kemungkinan besar selama ini mas ardhi udah pake ADO tapi ga nyadar aja ;) best regards [wwn] On 2/26/06, Ardhi Adhary Arbain <[EMAIL PROTECTED]> wrote: > > Salam kenal teman2 milis, > > Langsung aja ya, gw baru beberapa bulan mendalami VB. Barusan kemarin > bikin program VB yang nyambung ke database ms Access. Untuk koneksi > databasenya, gw masih pake MSJet, belum make ADO, soalnya gw masih > belum terlalu ngerti make ADO ^_^. > Setelah dicoba di kompi gw, progam ini jalan. Masalahnya muncul ketika > program ini di run di kompi yang lain. Muncul pesan error seperti ini : > > Class not registered. Looking for object with > CLSID:{00000010-0000-0010-8000-00AA006D2EA4} > > Setelah gw telusuri lewat debug mode, masalahnya muncul ketika program > meload object DBGRID. Dugaan gw sih, kalo bukan DBGRID yg error, > kemungkinan msjet-nya yang ngaco. Kemarin gw udah coba meng-copy > file-file berikut ke kompi ybs dan meregisternya di folder system32 : > > dbgrid32.ocx > msjet35.dll > msjter35.dll > msjint35.dll > > Tapi hasilnya masih sama, error. > Oya, ada satu lagi temuan gw, ternyata program ini ngaconya kalo > di-run di kompi yg nggak ada VBnya, tapi kalo ada VBnya program ini > jalan mulus. Kira2 kenapa ya ? > Mohon pencerahan. > > > > Ardhi [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 10 Date: Mon, 27 Feb 2006 09:23:26 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: Menggunakan DTPicker data tak tampil woi jangan panggil pak dong, gue masih muda kok (hehehe... berusaha ngingkari umur sdr ;P, tapi beneran, suer, bulan kemaren baru masuk 26 ;P ) perbedaannya ada di format bulannya mas, biar aman gunakan format medium ("JAN") atau long ("JANUARY"), jgn short ("01") karena bisa dianggap tgl 01. best regards [wwn] On 2/25/06, Nast Stsn <[EMAIL PROTECTED]> wrote: > > Makasih Pak Purwedi atas jawabannya. Sebetulnya saya juga dah coba seperti > jawaban dari *The Doctor" <[EMAIL PROTECTED] *<http://us.f607.mail.yahoo.com/ym/[EMAIL PROTECTED]> > *>* yang hampir sama dengan jawaban Bapak, tapi tetap gak bisa. Tapi saya > akan coba ulang lagi. Tapi kalau gak bisa lagi. Ada solusi lain selain itu > gak yan? > > > *Purwedi Kurniawan <[EMAIL PROTECTED]>* wrote: > > u. lebih amannya, ga peduli formatnya seperti apa, data di dtpickernya > diformat dulu dg menggunakan nama bulan, bisa "mmm" atau "mmmm", terserah > mau diletakkan didepan ("mmm dd yyyy") atau di tengah ("dd mmm yyyy"), > database otomatis akan mengenal nilai itu sebagai bulan dan bukan tanggal. > > mis: > * Set rsDtSurat = New ADODB.Recordset > rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & > format(DTPicker2.Value, "mmm dd yyyy") & "# and tglsurat <=#" & > format(DTPicker3.Value,"mmm dd yyyy") & "#", DtSurat, > adOpenDynamic, adLockOptimistic* > > best regards > [wwn] > > [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 11 Date: Sun, 26 Feb 2006 17:24:21 -0800 (PST) From: Doni Juana <[EMAIL PROTECTED]> Subject: Re: System is Out of Date Oche men --- rendra kurniawan <[EMAIL PROTECTED]> wrote: > Makasih mas doni atas informasinya,kalo begitu nanti > saya cari SP2 nya karena PC saya menggunakan > download otomatis, jadi sy gak tau ditaruh dimana > hasil downloadnya.. > > Boleh kan nanti sy tanya lagi kalo sy ada masalah, > tenang mas bukan masalah keuangan kok. > > Makasih banyak > > Doni Juana <[EMAIL PROTECTED]> wrote: > saya juga pernah mengalami hal yang demikian jadi > solusinya kalo PC yang digunakan untuk membuat file > setup.exe pada PC yang WinXP SP2 dan akan diinstal > pada PC WinXP Sp1 harus diupgrade dulu ke SP2 baru > bisa diinstal. semoga sukses. > > --- rendra kurniawan <[EMAIL PROTECTED]> wrote: > > > Maaf ya mas2 sekalian, kemarin belum selesai udah > ke > > sent duluan. > > > > > > Saya baru di dunia programming,mudah2an mas > > sys,mas ronald,mas purwedi dan temen2 vb yang > > bermurah hati dapat membantu saya... > > > > Saya menemukan pesan error "System is out of > > date.......". Error tersebut tampil saat saya coba > > menginstall program vb Setup ke PC lain yang tidak > > tersambung internet, sebab PC yg saya gunakan utk > > membuat Setup.Exe selalu ter update secara > otomatis > > karena PC tsb nyambung ke internet. > > Apakah saya perlu men download file update tsb > ke > > microsoft atau ada cara lain utk menanggulangi > error > > messages tsb. > > > > Mohon pencerahannya,soalnya agak gelap disini.. > > > > > > > > --------------------------------- > > Yahoo! Mail > > Bring photos to life! New PhotoMail makes sharing > a > > breeze. > > > __________________________________________________ > Do You Yahoo!? > Tired of spam? Yahoo! Mail has the best spam > protection around > http://mail.yahoo.com > > > Wahana Programmer Groups Links > > > > > > > > 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. > > > --------------------------------- > > > > > > --------------------------------- > Brings words and photos together (easily) with > PhotoMail - it's free and works with Yahoo! Mail. __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com ________________________________________________________________________ ________________________________________________________________________ Message: 12 Date: Mon, 27 Feb 2006 08:25:31 +0700 From: "Masim \"Vavai\" Sugianto" <[EMAIL PROTECTED]> Subject: Re: Menggunakan DTPicker data tak tampil Promo niy :-). 26 Tahun ya :-). Hanya tambahan. Saya biasanya menggunakan format tahun-bulan-tanggal (yyyy-mm-dd) dan selama ini tidak akan salah ambil antara MM-DD dan DD-MM. Salam, Vavai Purwedi Kurniawan wrote: > woi jangan panggil pak dong, gue masih muda kok (hehehe... berusaha > ngingkari umur sdr ;P, tapi beneran, suer, bulan kemaren baru masuk 26 > ;P ) > perbedaannya ada di format bulannya mas, biar aman gunakan format > medium ("JAN") atau long ("JANUARY"), jgn short ("01") karena bisa > dianggap tgl 01. > > best regards > [wwn] > [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 13 Date: Sun, 26 Feb 2006 17:35:23 -0800 (PST) From: Hasan <[EMAIL PROTECTED]> Subject: Analisa tabel Pagi rekans..... Saya lagi mslh neh, jadi gini, saya harus buat aplikasi dengan acuan aplikasi yang sudah ada, mgkn istilahnya, nyontoh aplikasi laen kali y....Nah, saya harus pake tabel yang sudah ada, sedangkan saya sendiri belom tau apa maksud dan kegunaan dari tiap field yang ada ditabel or databasenya, ada seh bbrp yang dikasih tau, dari user saya ada sedikit tau, tapi mereka jg ga tau secara keseluruhan.Pertanyaan saya, ada ga seh di sql 2k, cara buat bikin relasi, setau saya ada di diagrams itu y, tapi itu buat antar tabel kan y?Bisa ga kalo saya mo tau hub antar field dalam tabel, karena ada bbrp field yg ga jelas dari mana asalnya?? Thanx... Hasan __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com ________________________________________________________________________ ________________________________________________________________________ Message: 14 Date: Mon, 27 Feb 2006 09:47:53 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: Gimana sih codingnya membuat list view sebagai grid, kalau list view, harus di populate lagi seperti waktu ngisi pertama kali mas, ga bisa otomatis. best regards [wwn] On 2/25/06, robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> wrote: > > hai teman teman,,,gimana caranya pada saat update record baru dapat > bertambah pada list view,, and pada saat delete record,,list view dapat juga > hilang > > > pliss yach... [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 15 Date: Mon, 27 Feb 2006 01:53:41 -0000 From: "Ardhi Adhary Arbain" <[EMAIL PROTECTED]> Subject: Re: DBGRID/msjet error Makasih buat masukan mas wawan, mas jenar, dan mas rendra. nanti akan saya coba. arigatou gozaimasu, ardhi :) --- In [email protected], "Purwedi Kurniawan" <[EMAIL PROTECTED]> wrote: > > seperti kata teman2, mas ardhy coba buat installernya, paling ga sekali aja > diinstall di komputer lain itu, setelah itu biasanya kalau ga ada penambahan > komponen, cukup dikopi file exenya udah bisa jalan. > > sedikit pelurusan msjet itu hanyalah driver yg digunakan u. ngakses > ms-access database, sedangkan pengolahan datanya di vb pasti menggunakan > salah satu dari 3 metode ini, DAO, RDO atau ADO. jadi kemungkinan besar > selama ini mas ardhi udah pake ADO tapi ga nyadar aja ;) > > best regards > [wwn] ________________________________________________________________________ ________________________________________________________________________ Message: 16 Date: Mon, 27 Feb 2006 08:51:26 +0700 From: "Masim \"Vavai\" Sugianto" <[EMAIL PROTECTED]> Subject: Re: Gimana sih codingnya membuat list view sebagai grid, Dalam kata lainnya, Buat saja fungsi Refresh / RetrieveData yang fungsinya melakukan pengambilan data. Setiap hapus / tambah / edit data selalu memanggil fungsi tersebut. Saya pikir ini sesuatu yang lumrah kok :-). Untuk jaga-jaga jika datanya banyak, batasi saat pengambilan record (perintah SQLnya selalu menyertakan where). Salam, Vavai Purwedi Kurniawan wrote: > kalau list view, harus di populate lagi seperti waktu ngisi pertama > kali mas, ga bisa otomatis. > > best regards > [wwn] > > On 2/25/06, *robi alfian muhtar robi alfian muhtar* > <[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>> wrote: > > hai teman teman,,,gimana caranya pada saat update record baru > dapat bertambah pada list view,, and pada saat delete record,,list > view dapat juga hilang > > > pliss yach... > > [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 17 Date: Mon, 27 Feb 2006 09:04:45 +0700 From: "Yunatan S.W" <[EMAIL PROTECTED]> Subject: Re: Menggunakan DTPicker data tak tampil Kalau saya pakai yang dibawah ini berhasil dengan sukses. Mungkin bisa di coba juga kang, dengan catatan komputer system di setting format date nya adalah dengan dd/mm/yy (di control panel) Dengan cara ini, berhasil tuh.... Dim MySql As String Set RsRL = New ADODB.Recordset RsRL.Open "delete from temprugilaba", db, adOpenDynamic, adLockOptimistic Set RsRL = New ADODB.Recordset RsRL.Open "select * from temprugilaba", db, adOpenDynamic, adLockOptimistic Set RsJual = New ADODB.Recordset MySql = "SELECT JualLIN.NoJual as nojual, JualHDR.Tanggal as tanggal, " MySql = MySql + "JualLIN.Kode as kode, Barang.nama as nama, barang.satuan as satuan, " MySql = MySql + "JualLIN.Jumlah as jumlah, JualLIN.HargaItem as HargaItem, " MySql = MySql + "JualLIN.HargaRata as hargarata " MySql = MySql + "FROM (JualLIN INNER JOIN JualHDR ON JualLIN.NoJual = JualHDR.NoJual) " MySql = MySql + "INNER JOIN Barang ON JualLIN.Kode = Barang.Kode " MySql = MySql + "Where jualhdr.tanggal>=#" & Format(DTPicker1.Value, "mm/dd/yy") & "# " MySql = MySql + "and jualhdr.tanggal<=#" & Format(DTPicker2.Value, "mm/dd/yy") & "#" RsJual.Open MySql, db, adOpenDynamic, adLockOptimistic If Not RsJual.EOF Then RsJual.MoveFirst Do While Not RsJual.EOF RsRL.AddNew RsRL.Fields("nojual").Value = RsJual.Fields("nojual").Value RsRL.Fields("tanggal").Value = RsJual.Fields("tanggal").Value RsRL.Fields("kode").Value = RsJual.Fields("kode").Value RsRL.Fields("nama").Value = RsJual.Fields("nama").Value RsRL.Fields("jumlah").Value = RsJual.Fields("jumlah").Value RsRL.Fields("satuan").Value = RsJual.Fields("satuan").Value RsRL.Fields("hargaitem").Value = RsJual.Fields("hargaitem").Value RsRL.Fields("hargarata").Value = Round(RsJual.Fields("jumlah").Value * RsJual.Fields("hargarata").Value, 2) RsRL.Update RsJual.MoveNext Loop End If ----- Original Message ----- From: Nast Stsn To: [email protected] Sent: Saturday, February 25, 2006 4:35 PM Subject: Re: [Programmer-VB] Menggunakan DTPicker data tak tampil Makasih Pak Purwedi atas jawabannya. Sebetulnya saya juga dah coba seperti jawaban dari The Doctor" <[EMAIL PROTECTED] > yang hampir sama dengan jawaban Bapak, tapi tetap gak bisa. Tapi saya akan coba ulang lagi. Tapi kalau gak bisa lagi. Ada solusi lain selain itu gak yan? Purwedi Kurniawan <[EMAIL PROTECTED]> wrote: u. lebih amannya, ga peduli formatnya seperti apa, data di dtpickernya diformat dulu dg menggunakan nama bulan, bisa "mmm" atau "mmmm", terserah mau diletakkan didepan ("mmm dd yyyy") atau di tengah ("dd mmm yyyy"), database otomatis akan mengenal nilai itu sebagai bulan dan bukan tanggal. mis: Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & format(DTPicker2.Value, "mmm dd yyyy") & "# and tglsurat <=#" & format(DTPicker3.Value,"mmm dd yyyy") & "#", DtSurat, adOpenDynamic, adLockOptimistic best regards [wwn] On 2/23/06, Nast Stsn <[EMAIL PROTECTED]> wrote: Terima kasih atas bantuannya Tapi maaf nih saya masih belum bisa menampilkan datanya. Jadi gimana nih listingnya kalau saya buka data base mengacu pada tanggal yang ada pada DTPicker (DateTimePicker) Mohon dibantu REPLY FROM :"The Doctor" <[EMAIL PROTECTED] > Setau saya (kalo pengetahuan saya tidak salah), di database data tetap tersimpan dalam format MM/DD/YYYY. Sehingga ketika kita query pake format tsb, data bisa ditampilkan. Supaya ditampilan bisa tampil dalam format DD/MM/YYYY, manipulasi di sisi tampilannya saja. Contohnya, DTPicker tetap dikasih format DD/MM/YYYY ditampilannya, tapi pas ketika dikirim ke database, kita format menjadi MM/DD/YYYY. Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & format(DTPicker2.Value, "mm/dd/yyyy") & "# and tglsurat <=#" & format(DTPicker3.Value,"mm/dd/yyyy") & "#", DtSurat, adOpenDynamic, adLockOptimistic Semoga membantu. REPLY FROM: johan max" <[EMAIL PROTECTED]> field waktu di database tidak disimpan dalam bentuk string tapi dalam bentuk double. ketika diquery ada proses konversi Nast Stsn <[EMAIL PROTECTED]> wrote: Minta tolong penjelasannya nih! Private Sub Form_Activate() DTPicker2.Value = Format(Now, "dd/MM/yy") DTPicker3.Value = Format(Now, "dd/MM/yy") Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & DTPicker2.Value & "# and tglsurat <=#" & DTPicker3.Value & "#", DtSurat, adOpenDynamic, adLockOptimistic TampilAwal End Sub Dengan listing seperti di atas data tidak ada yang tampil, bahkan saya juga atur di properties DTPickernya Format = 3-dtpCustom dan CustomFormat =dd/MM/yy Tetap tidak tampil. Untuk diketahui saya pakai database Access dengan seting Field tglsurat = dd/MM/yy. Tapi kalau saya gunakan listing seperti di bawah ini dan setingan properties DTPickernya default, data bisa tampil Private Sub Form_Activate() DTPicker2.Value = Format(Now, "M/d/yy") DTPicker3.Value = Format(Now, "M/d/yy") Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & DTPicker2.Value & "# and tglsurat <=#" & DTPicker3.Value & "#", DtSurat, adOpenDynamic, adLockOptimistic TampilAwal End Sub Bagaimana caranya agar data tampil dengan setingan tanggal dd/MM/yy dan dengan menggunakan obyek DTPicker? SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language ---------------------------------------------------------------------------- -- Yahoo! Mail Bring photos to life! New PhotoMail makes sharing a breeze. Wahana Programmer Groups Links SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language ---------------------------------------------------------------------------- -- YAHOO! GROUPS LINKS a.. Visit your group "Programmer-VB" on the web. b.. To unsubscribe from this group, send an email to: [EMAIL PROTECTED] c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. ---------------------------------------------------------------------------- -- ---------------------------------------------------------------------------- -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.1.375 / Virus Database: 267.15.10/263 - Release Date: 16/02/06 [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 18 Date: Mon, 27 Feb 2006 09:07:19 +0700 From: "Yunatan S.W" <[EMAIL PROTECTED]> Subject: Menggunakan DTPicker data tak tampil ----- Original Message ----- From: Yunatan S.W To: [email protected] Sent: Monday, February 27, 2006 9:04 AM Subject: Re: [Programmer-VB] Menggunakan DTPicker data tak tampil Kalau saya pakai yang dibawah ini berhasil dengan sukses. Mungkin bisa di coba juga kang, dengan catatan komputer system di setting format date nya adalah dengan dd/mm/yy (di control panel) Dengan cara ini, berhasil tuh.... Dim MySql As String Set RsRL = New ADODB.Recordset RsRL.Open "delete from temprugilaba", db, adOpenDynamic, adLockOptimistic Set RsRL = New ADODB.Recordset RsRL.Open "select * from temprugilaba", db, adOpenDynamic, adLockOptimistic Set RsJual = New ADODB.Recordset MySql = "SELECT JualLIN.NoJual as nojual, JualHDR.Tanggal as tanggal, " MySql = MySql + "JualLIN.Kode as kode, Barang.nama as nama, barang.satuan as satuan, " MySql = MySql + "JualLIN.Jumlah as jumlah, JualLIN.HargaItem as HargaItem, " MySql = MySql + "JualLIN.HargaRata as hargarata " MySql = MySql + "FROM (JualLIN INNER JOIN JualHDR ON JualLIN.NoJual = JualHDR.NoJual) " MySql = MySql + "INNER JOIN Barang ON JualLIN.Kode = Barang.Kode " MySql = MySql + "Where jualhdr.tanggal>=#" & Format(DTPicker1.Value, "mm/dd/yy") & "# " MySql = MySql + "and jualhdr.tanggal<=#" & Format(DTPicker2.Value, "mm/dd/yy") & "#" RsJual.Open MySql, db, adOpenDynamic, adLockOptimistic If Not RsJual.EOF Then RsJual.MoveFirst Do While Not RsJual.EOF RsRL.AddNew RsRL.Fields("nojual").Value = RsJual.Fields("nojual").Value RsRL.Fields("tanggal").Value = RsJual.Fields("tanggal").Value RsRL.Fields("kode").Value = RsJual.Fields("kode").Value RsRL.Fields("nama").Value = RsJual.Fields("nama").Value RsRL.Fields("jumlah").Value = RsJual.Fields("jumlah").Value RsRL.Fields("satuan").Value = RsJual.Fields("satuan").Value RsRL.Fields("hargaitem").Value = RsJual.Fields("hargaitem").Value RsRL.Fields("hargarata").Value = Round(RsJual.Fields("jumlah").Value * RsJual.Fields("hargarata").Value, 2) RsRL.Update RsJual.MoveNext Loop End If ----- Original Message ----- From: Nast Stsn To: [email protected] Sent: Saturday, February 25, 2006 4:35 PM Subject: Re: [Programmer-VB] Menggunakan DTPicker data tak tampil Makasih Pak Purwedi atas jawabannya. Sebetulnya saya juga dah coba seperti jawaban dari The Doctor" <[EMAIL PROTECTED] > yang hampir sama dengan jawaban Bapak, tapi tetap gak bisa. Tapi saya akan coba ulang lagi. Tapi kalau gak bisa lagi. Ada solusi lain selain itu gak yan? Purwedi Kurniawan <[EMAIL PROTECTED]> wrote: u. lebih amannya, ga peduli formatnya seperti apa, data di dtpickernya diformat dulu dg menggunakan nama bulan, bisa "mmm" atau "mmmm", terserah mau diletakkan didepan ("mmm dd yyyy") atau di tengah ("dd mmm yyyy"), database otomatis akan mengenal nilai itu sebagai bulan dan bukan tanggal. mis: Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & format(DTPicker2.Value, "mmm dd yyyy") & "# and tglsurat <=#" & format(DTPicker3.Value,"mmm dd yyyy") & "#", DtSurat, adOpenDynamic, adLockOptimistic best regards [wwn] On 2/23/06, Nast Stsn <[EMAIL PROTECTED]> wrote: Terima kasih atas bantuannya Tapi maaf nih saya masih belum bisa menampilkan datanya. Jadi gimana nih listingnya kalau saya buka data base mengacu pada tanggal yang ada pada DTPicker (DateTimePicker) Mohon dibantu REPLY FROM :"The Doctor" <[EMAIL PROTECTED] > Setau saya (kalo pengetahuan saya tidak salah), di database data tetap tersimpan dalam format MM/DD/YYYY. Sehingga ketika kita query pake format tsb, data bisa ditampilkan. Supaya ditampilan bisa tampil dalam format DD/MM/YYYY, manipulasi di sisi tampilannya saja. Contohnya, DTPicker tetap dikasih format DD/MM/YYYY ditampilannya, tapi pas ketika dikirim ke database, kita format menjadi MM/DD/YYYY. Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & format(DTPicker2.Value, "mm/dd/yyyy") & "# and tglsurat <=#" & format(DTPicker3.Value,"mm/dd/yyyy") & "#", DtSurat, adOpenDynamic, adLockOptimistic Semoga membantu. REPLY FROM: johan max" <[EMAIL PROTECTED]> field waktu di database tidak disimpan dalam bentuk string tapi dalam bentuk double. ketika diquery ada proses konversi Nast Stsn <[EMAIL PROTECTED]> wrote: Minta tolong penjelasannya nih! Private Sub Form_Activate() DTPicker2.Value = Format(Now, "dd/MM/yy") DTPicker3.Value = Format(Now, "dd/MM/yy") Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & DTPicker2.Value & "# and tglsurat <=#" & DTPicker3.Value & "#", DtSurat, adOpenDynamic, adLockOptimistic TampilAwal End Sub Dengan listing seperti di atas data tidak ada yang tampil, bahkan saya juga atur di properties DTPickernya Format = 3-dtpCustom dan CustomFormat =dd/MM/yy Tetap tidak tampil. Untuk diketahui saya pakai database Access dengan seting Field tglsurat = dd/MM/yy. Tapi kalau saya gunakan listing seperti di bawah ini dan setingan properties DTPickernya default, data bisa tampil Private Sub Form_Activate() DTPicker2.Value = Format(Now, "M/d/yy") DTPicker3.Value = Format(Now, "M/d/yy") Set rsDtSurat = New ADODB.Recordset rsDtSurat.Open "select * from tblsurat where tglsurat >=#" & DTPicker2.Value & "# and tglsurat <=#" & DTPicker3.Value & "#", DtSurat, adOpenDynamic, adLockOptimistic TampilAwal End Sub Bagaimana caranya agar data tampil dengan setingan tanggal dd/MM/yy dan dengan menggunakan obyek DTPicker? SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language ---------------------------------------------------------------------------- -- Yahoo! Mail Bring photos to life! New PhotoMail makes sharing a breeze. Wahana Programmer Groups Links SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language ---------------------------------------------------------------------------- -- YAHOO! GROUPS LINKS a.. Visit your group "Programmer-VB" on the web. b.. To unsubscribe from this group, send an email to: [EMAIL PROTECTED] c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. ---------------------------------------------------------------------------- -- ---------------------------------------------------------------------------- -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.1.375 / Virus Database: 267.15.10/263 - Release Date: 16/02/06 [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 19 Date: Mon, 27 Feb 2006 09:31:12 +0700 (ICT) From: robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> Subject: GIMANA SIH CARA PENCARIAN DATA PER KARAKTER dear all ada yang tau ga sih gimana caranya teknik pencarian data per karakter coding tersebut akan saya pake pada event textbox change misalnya ada data seperti ini RIO ROBI EKA EVA RONALD PADA SAAT SAYA KETIKAN HURUF R DI TEXT BOX MAKA NAMA YANG PALING MENDEKATI AKAN DITAMPILKAN DI TEXT BOX PLISS YAH --------------------------------- Apakah Anda Yahoo!? Kunjungi halaman depan Yahoo! Indonesia yang baru! [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 20 Date: Mon, 27 Feb 2006 10:38:03 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: GIMANA SIH CARA PENCARIAN DATA PER KARAKTER bisa pake fungsi INSTR nya vb. best regards [wwn] On 2/27/06, robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> wrote: > > dear all > > ada yang tau ga sih gimana caranya teknik pencarian data per karakter > > coding tersebut akan saya pake pada event textbox change > misalnya ada data seperti ini > > RIO > ROBI > EKA > EVA > RONALD > > PADA SAAT SAYA KETIKAN HURUF R DI TEXT BOX MAKA NAMA YANG PALING MENDEKATI > AKAN DITAMPILKAN DI TEXT BOX > PLISS YAH > [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 21 Date: Mon, 27 Feb 2006 09:41:42 +0700 From: [EMAIL PROTECTED] Subject: Re: Gimana sih codingnya membuat list view sebagai grid, coba pake coding di bawah ini..... Public Function FillMyList(mlist As ListView, SQL As String, cn As ADODB.Connection) As Boolean Dim rs As New ADODB.Recordset, k As Integer Dim itmX As ListItem mlist.ListItems.Clear mlist.View = lvwReport mlist.FullRowSelect = True mlist.GridLines = True rs.Open SQL, cn, adOpenDynamic, adLockOptimistic If mlist.ColumnHeaders.Count = 0 Then For k = 0 To rs.Fields.Count - 1 mlist.ColumnHeaders.Add k + 1, , UCase(rs.Fields(k).Name), Len(rs.Fields(k).Name) * 200 Next End If If rs.RecordCount > 0 Then rs.MoveFirst Do While Not rs.EOF Set itmX = mlist.ListItems.Add(, , rs.Fields(0)) If rs.Fields.Count > 1 And mlist.ColumnHeaders.Count > rs.Fields.Count Then For k = 1 To rs.Fields.Count - 1 If Not IsNull(rs.Fields(k)) Then itmX.SubItems(k) = rs.Fields(k) Next k ElseIf rs.Fields.Count > 1 And mlist.ColumnHeaders.Count <= rs.Fields.Count Then For k = 1 To mlist.ColumnHeaders.Count - 1 If Not IsNull(rs.Fields(k)) Then itmX.SubItems(k) = rs.Fields(k) Next k End If rs.MoveNext Loop End If rs.Close Set rs = Nothing End Function trus panggil pake Call FillMyList(ListView1, "Select * from ITEM ", con) con itu variabel connection dari database anda semoga membantu salam den aly "Purwedi Kurniawan" To: [email protected] <purwedi.kurniawan cc: @gmail.com> Subject: Re: [Programmer-VB] Gimana sih codingnya membuat list view sebagai grid, Sent by: [EMAIL PROTECTED] ogroups.com 02/27/2006 08:47 AM Please respond to Programmer-VB kalau list view, harus di populate lagi seperti waktu ngisi pertama kali mas, ga bisa otomatis. best regards [wwn] On 2/25/06, robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> wrote:hai teman teman,,,gimana caranya pada saat update record baru dapat bertambah pada list view,, and pada saat delete record,,list view dapat juga hilang pliss yach... Wahana Programmer Groups Links SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming Programming Java programming languages languages 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. ________________________________________________________________________ ________________________________________________________________________ Message: 22 Date: Mon, 27 Feb 2006 10:52:45 +0800 (CST) From: "A. kahana" <[EMAIL PROTECTED]> Subject: Dimana beli software Visual Basic Versi 6? Rekan-rekan, Kami ingin membeli software Visual Basic Versi 6 (yang berlisensi) Apakah Rekan2 ada yang tahu dimana saya bisa mendapatkannya? Lokasi saya ada di jogja Please kontak 081392032420 Makasih Kahana --------------------------------- Meet your soulmate! Yahoo! Asia presents Meetic - where millions of singles gather [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 23 Date: Mon, 27 Feb 2006 09:44:18 +0700 From: "JemyX Shinichi" <[EMAIL PROTECTED]> Subject: Re: GIMANA SIH CARA PENCARIAN DATA PER KARAKTER oops lagi marah bukan sampe pake capslock pake nya cara ini : MS-Access "SELECT * FROM [NamaTable] WHERE [namaFilds] LIKE '*" & kondisi & "*'" SQL Server "SELECT * FROM [NamaTable] WHERE [namaFilds] LIKE '%" & kondisi & "%'" perasaan dah sering dech, buka aja arsip milist........ Cheers, Jemy 25 thn dan tidak merokok (mendukung UU anti rokok di tempan umum) ----- Original Message ----- From: robi alfian muhtar robi alfian muhtar To: [email protected] Sent: Monday, February 27, 2006 9:31 AM Subject: [Programmer-VB] GIMANA SIH CARA PENCARIAN DATA PER KARAKTER dear all ada yang tau ga sih gimana caranya teknik pencarian data per karakter coding tersebut akan saya pake pada event textbox change misalnya ada data seperti ini RIO ROBI EKA EVA RONALD PADA SAAT SAYA KETIKAN HURUF R DI TEXT BOX MAKA NAMA YANG PALING MENDEKATI AKAN DITAMPILKAN DI TEXT BOX PLISS YAH Wahana Programmer Groups Links SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language ---------------------------------------------------------------------------- -- YAHOO! GROUPS LINKS a.. Visit your group "Programmer-VB" on the web. b.. To unsubscribe from this group, send an email to: [EMAIL PROTECTED] c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. ---------------------------------------------------------------------------- -- ---------------------------------------------------------------------------- -- Apakah Anda Yahoo!? Kunjungi halaman depan Yahoo! Indonesia yang baru! [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ Message: 24 Date: Mon, 27 Feb 2006 10:06:05 +0700 From: "Farid Thoyib (Indo)" <[EMAIL PROTECTED]> Subject: Re:Re: Membuat Properti untuk UserControl Mas Pur, thanks banget. Setelah berjuang tiga hari tiga malam mencoba-coba, akhirnya bisa juga. Belum sempurna banget sih, mudah-mudahan nantinya bisa lebih bagus. Mas Pur ini lokasi di Balikpapan yah? >Date: Fri, 24 Feb 2006 11:18:01 +0800 >From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> >Subject: Re: Membuat Properti untuk UserControl > >nambahin dikit ;P >sebenarnya visual basic sendiri punya tools bawaan yg powerful banget buat >bikin usercontrol dan property2nya. coba mas masuk ke AddIns terus load >ActiveX Control Interface Wizard (ini lebih ke pembuatan properties2 yg >berhubungan dg interface) dan Property Page Wizard (u. custom property). > >kedua wizard ini akan otomatis membuatkan variable2 local u. menyimpan nilai >propertynya, method2 LET/GET/SET nya, set nilai defaultnya di >initproperties, dan property bagnya. singkatnya hampir semua proses >pembuatan properties u. control kita akan dibuatkan oleh kedua tools ini. >tinggal gimana kita menggunakannya saja. > >jgn lupa ntar kalau controlnya udah jadi, dibagi ke programmer-vb ya mas :) > >best regards >[wwn] > >On 2/22/06, Purwedi Kurniawan <[EMAIL PROTECTED]> wrote: >> >> waw salut buat mas toyib ;) >> >>mas thoyib, saya kasih intinya saja ya, buat contoh mas bisa googling ;) >> >> buat mengambil atau mengembalikan nilai properties di user control, kita >> bisa menggunakan keyword Public Property LET/SET (memberi nilai), GET >> (mengembalikan nilai ke user) sama seperti class object biasa, dan yg paling >> penting adalah menyimpan nilai2nya ke Property Bag (method >> UserControl_ReadProperties dan UserControl_WriteProperties), jadi kalau >> controlnya kita liat di propertiesnya vb, data yg terakhir dipilih sama user >> tetap ada dan pada waktu projectnya dibuka lagi (setelah disimpan tentunya), >> vb akan membaca properties2 usercontrol yg tersimpan di file project *.vbp >> itu (disimpan dg perintah WriteProperties) dan memberikan nilai properties2 >> usercontrol kita sesuai nilai yg tersimpan tadi. Jadi kalau kita ga pake >> Read/Write Properties, nilai2 yg kita ubah ga disimpan di file project kita >> n setiap kali kita buka file projectnya, nilai di propertiesnya adalah >> nilai2 default :( >> >> Gunakan Let u. variable biasa, SET u. object variable. GET u. >> mengembalikan nilai properties ke user. >> Gunakan Event InitProperties u. memberi nilai awal masing2 properties >> (default values, sebaiknya gunakan constanta u. menyimpan default values >> ini.). >> Yg terpenting jangan lupa menyimpan nilai yg dipilih user tadi ke Property >> Bag, nilai inilah yg dibaca oleh Properties-nya VB (F4 di VB-IDE) >> >> hehehe... sorry kalau bhsnya muter2 ;P >> >> best regards >> [wwn] ________________________________________________________________________ ________________________________________________________________________ Message: 25 Date: Mon, 27 Feb 2006 11:09:12 +0800 From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> Subject: Re: Cara koneksi dari SQL SERVER 2000 ke Program 'letakkan ini di module atau bagian atas form, sesuaikan dt source, catalog, userid dan passwordnya, sebaiknya jg pake user id "sa" private const m_cnstring_trusted as string = "Provider=sqloledb;Data Source=dbserver;Initial Catalog=databasename;Integrated Security=SSPI;" private const m_cnstring_untrusted as string = "Provider=sqloledb;Data Source=dbserver;Initial Catalog=databasename;User Id=myid;Password=asdasd;" public cn as ADODB.Connection 'letakkan ini di sub main atau di form load If cn Is Nothing Then Set cn = New ADODB.Connection ElseIf cn.State = adStateOpen Then cn.Close End If With cn .ConnectionString = m_cnstring_untrusted 'buat untrusted connection, kalau mau pake trusted connection tinggal ganti dg m_cnstring_trusted .CursorLocation = adUseClient .Open End With best regards [wwn] On 2/25/06, robi alfian muhtar robi alfian muhtar <[EMAIL PROTECTED]> wrote: > > teman2,,saya baru mencoba nich buat program pake sql server 2000 sebagai > databasenya... > > gimana yach cara caranya dan kodingnya koneksi dengan metode ADODB,, > baik dengan windows autentication / sql server autentication,,,,, > > listingnya yang lengkap yach,,,,lagi belajar nich..... [This message contained attachments] ________________________________________________________________________ ________________________________________________________________________ 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/
