This is featured post 1 title
Replace these every slider sentences with your featured post descriptions.Go to Blogger edit html and find these sentences.Now replace these with your own descriptions.This theme is Bloggerized by Lasantha - Premiumbloggertemplates.com.
This is featured post 2 title
Replace these every slider sentences with your featured post descriptions.Go to Blogger edit html and find these sentences.Now replace these with your own descriptions.This theme is Bloggerized by Lasantha - Premiumbloggertemplates.com.
This is featured post 3 title
Replace these every slider sentences with your featured post descriptions.Go to Blogger edit html and find these sentences.Now replace these with your own descriptions.This theme is Bloggerized by Lasantha - Premiumbloggertemplates.com.
04-02-2011
Label:
Diary
0
komentar
Untuk sementara berhrnti mengerjakan form, dan diberi tugas untuk, mempelajari alur flowchart ujian.
02-02-2011
Label:
Diary
0
komentar
Mempelajari Kode koneksi my Sql server dengan VB.06 karena masih belum bisa terhubung.
Love
Label:
Love
2
komentar
“cinta bukan mimpi..
tapi sebuah harapan..
.cinta bukan apa eank di dapat..
tapi apa eank di raza..
.terasa dekat walopun jaoh..
.karna cinta bukanlah puisi..
melainkan ungkapan isi hati..
.cinta bisa buat bahagia..duka..ataupun buta
cinta penuh dengan pengorbanan..kepahitan..keindahan..dan kehangatan
cinta sebuah keinginan untuk memberi..
tanpa meminta apa-apa
cinta akan indah jika qta dapat saling melengkapi
menerima kekurangan dan
memberi kelebihan
tapi sebuah harapan..
.cinta bukan apa eank di dapat..
tapi apa eank di raza..
.terasa dekat walopun jaoh..
.karna cinta bukanlah puisi..
melainkan ungkapan isi hati..
.cinta bisa buat bahagia..duka..ataupun buta
cinta penuh dengan pengorbanan..kepahitan..keindahan..dan kehangatan
cinta sebuah keinginan untuk memberi..
tanpa meminta apa-apa
cinta akan indah jika qta dapat saling melengkapi
menerima kekurangan dan
memberi kelebihan
01-01-2011
Label:
Diary
0
komentar
Mencoba Coding pada form yang telah dibuat kemarin dengan mengkoneksikan pada Sql server.
Kode Koneksi :
Public Sub main()
Dim rs As New Recordset
If ConnAPP.State = 1 Then ConnAPP.Close
ConnAPP.ConnectionString = "Provider=SQLOLEDB.1;Password=fan;Persist Security Info=True;User ID=fan;Initial Catalog=ujian;Data Source=."
ConnAPP.CursorLocation = adUseClient
ConnAPP.Open
frmDaftarSiswa.Show
End Sub
Kode Koneksi :
Public Sub main()
Dim rs As New Recordset
If ConnAPP.State = 1 Then ConnAPP.Close
ConnAPP.ConnectionString = "Provider=SQLOLEDB.1;Password=fan;Persist Security Info=True;User ID=fan;Initial Catalog=ujian;Data Source=."
ConnAPP.CursorLocation = adUseClient
ConnAPP.Open
frmDaftarSiswa.Show
End Sub
Langganan:
Postingan (Atom)
