mysql_escape_string
To put the full result in one array, I wrote this function:
$query="select * from table_xyz";$result = mysql_query($query) or die(mysql_error());$arr_table_result=mysql_fetch_full_result_array($result);
function mysql_fetch_full_result_array($result)
{
$table_result=array();
$r=0;
while($row = mysql_fetch_assoc($result)){
$arr_row=array();
$c=0;
while ($c < mysql_num_fields($result)) {
$col = mysql_fetch_field($result, $c);
$arr_row[$col -> name] = $row[$col -> name];
$c++;
}
$table_result[$r] = $arr_row;
$r++;
}
return $table_result;
}
echo $arr_table_result[2]['id'];
?>Akhirnya kesampaian juga menulis tentang pemrograman. Pada Kesempatan kali ini saya akan memberikan tips bagaimana membuat koneksi database dari sql server 2005 ke visual basic 2005 (VB 2005).
Kenapa VB 2005, karena saat ini saya sedang belajar pemrograman vb 2005 ditambah sudah semakin berumurnya vb 6, membuat saya ingin beralih. Ok langsung kita mulai saja.
Sebelumnya, jika Anda blm punya SQL server 2005 Express disini
dan SQL Server Management Studio Express disini
dan SQL Server Management Studio Express disini
Buat dahulu database di SQL server dengan menggunakan SQL Server Management Studio Express.
Buka SQL Server Management Studio Express di Start Menu ->All programs -> Microsoft SQL Server 2005 -> SQL Server Management Studio Express.
Buka SQL Server Management Studio Express di Start Menu ->All programs -> Microsoft SQL Server 2005 -> SQL Server Management Studio Express.
Setelah itu akan muncul tampilan seperti di bawah ini :
Pastikan nama servernya benar, setelah itu pada klik kanan pada database -> New database. Dalam contoh ini saya akan membuat database dengan nama Ihsan
Setelah selesai, buka visual basic 2005. Tambahkan sebuah objek di form, yaitu button. Lalu ganti tulisan button dengan tulisan “Connect to database” dengan cara mengganti properti text pada button.
Setelah itu kita masuk pada tahap coding, double click pada button yang telah ditambahkan tadi.
Setelah itu kita masuk pada tahap coding, double click pada button yang telah ditambahkan tadi.
Masukan code dibawah ini ke dalam form coding tersebut :
Public Class Form1
Inherits System.Windows.Forms.Form
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sqlconn As New SqlClient.SqlConnection
‘membuat koneksi dengan database
‘RAIN-57C3A9A4CD\SQLEXPRESS adalah nama server di komputer, ini bisa diganti
sqlconn.ConnectionString = “server = RAIN-57C3A9A4CD\SQLEXPRESS;Database = Ihsan;integrated security=true”
Inherits System.Windows.Forms.Form
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sqlconn As New SqlClient.SqlConnection
‘membuat koneksi dengan database
‘RAIN-57C3A9A4CD\SQLEXPRESS adalah nama server di komputer, ini bisa diganti
sqlconn.ConnectionString = “server = RAIN-57C3A9A4CD\SQLEXPRESS;Database = Ihsan;integrated security=true”
Try
sqlconn.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, “Connection Failed”, MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
If sqlconn.State = 1 Then
Me.Text = “Koneksi Berhasil”
Me.BackColor = Color.Aqua
End If
End Sub
End Class
sqlconn.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, “Connection Failed”, MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
If sqlconn.State = 1 Then
Me.Text = “Koneksi Berhasil”
Me.BackColor = Color.Aqua
End If
End Sub
End Class
Perancangan form
Koneksi berhasil
Penjelasan :
1. Inherits System.Windows.Forms.Form : Class Form1 sebagai turunan
(inherits)dari System.Windows.Forms.Form. Ini karena setiap objek
yang kita buat pada vb 2005 terdiri dari class.
2. sqlconn.ConnectionString = “server =
RAIN-57C3A9A4CD\SQLEXPRESS;Database = Ihsan;integrated
security=true” : Sintaks ini sebagai pembuat koneksi
database antara vb 2005 dengan sql server 2005, dengan nama
server “RAIN-57C3A9A4CD\SQLEXPRESS” adalah nama komputer
saya, sedangkan nama databasenya adalah Ihsan sesuai dengan
yang tadi telah kita buat. Nama server dan database sebaiknya
diganti sesuai nama server pada laptop atau komputer anda.
RAIN-57C3A9A4CD\SQLEXPRESS;Database = Ihsan;integrated
security=true” : Sintaks ini sebagai pembuat koneksi
database antara vb 2005 dengan sql server 2005, dengan nama
server “RAIN-57C3A9A4CD\SQLEXPRESS” adalah nama komputer
saya, sedangkan nama databasenya adalah Ihsan sesuai dengan
yang tadi telah kita buat. Nama server dan database sebaiknya
diganti sesuai nama server pada laptop atau komputer anda.
3. Perintah try sampai dengan end try adalah sintaks yang berfungsi
untuk mengalihkan jika terjadi error. Jika dalam instruksi dalam Try
terdapat kesalahan maka yang akan dijalankan adalah instruksi
dibawah catch. Dalam contoh di atas apabila, tidak ada kesalahan
pada Try koneksi akan berjalan, sedangkan jika tidak akan keluar
pesan eror.
untuk mengalihkan jika terjadi error. Jika dalam instruksi dalam Try
terdapat kesalahan maka yang akan dijalankan adalah instruksi
dibawah catch. Dalam contoh di atas apabila, tidak ada kesalahan
pada Try koneksi akan berjalan, sedangkan jika tidak akan keluar
pesan eror.
4. Sedangkan pada percabangan if, jika koneksi berhasil akan merubah background form dan properti text pada form.
Postingan
