• 05-01-2011, 19:09:52
    #1
    Visual Basic ile SQL bağlantısı kurdum.
    Şimdi SQL'deki tablolarıma verileri Visual Basic üzerinde görsel (arayüz) olarak eklemek istiyorum.
    Bu konuda yardımcı olabilecek var mı acaba?
  • 05-01-2011, 20:28:54
    #2
    Üyeliği durduruldu
    vb 6.0 ? Visual Studio ?
  • 05-01-2011, 21:04:52
    #3
    dizaynart adlı üyeden alıntı: mesajı görüntüle
    vb 6.0 ? Visual Studio ?
    Visual Studio kullanıyorum.
  • 05-01-2011, 23:14:21
    #4
    future adlı üyeden alıntı: mesajı görüntüle
    Visual Basic ile SQL bağlantısı kurdum.
    Şimdi SQL'deki tablolarıma verileri Visual Basic üzerinde görsel (arayüz) olarak eklemek istiyorum.
    Bu konuda yardımcı olabilecek var mı acaba?
    Imports System.Data.OleDb
    Public Class Form1
    Dim cn As OleDbConnection
    Dim cmd As OleDbCommand
    Dim dr As OleDbDataReader




    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


    cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=database.mdb;")
    cn.Open()

    cmd = New OleDbCommand("select count (*) as maxrecord from items", cn)
    dr = cmd.ExecuteReader
    dr.Read()



    msgbox(dr("colon_adi"))

    End Sub


    End Class


    Yukardaki kod basit bir şekilde mdb database ' e bağlanıp ekrana birinci kolonu mesaj kutusu olarak yazdırır.

    Database'in çeşitine göre oledb bölümü değiştirilebilir. Kolay gelsin.
  • 05-01-2011, 23:23:33
    #5
    mehkar adlı üyeden alıntı: mesajı görüntüle
    Imports System.Data.OleDb
    Public Class Form1
    Dim cn As OleDbConnection
    Dim cmd As OleDbCommand
    Dim dr As OleDbDataReader




    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


    cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=database.mdb;")
    cn.Open()

    cmd = New OleDbCommand("select count (*) as maxrecord from items", cn)
    dr = cmd.ExecuteReader
    dr.Read()



    msgbox(dr("colon_adi"))

    End Sub


    End Class


    Yukardaki kod basit bir şekilde mdb database ' e bağlanıp ekrana birinci kolonu mesaj kutusu olarak yazdırır.

    Database'in çeşitine göre oledb bölümü değiştirilebilir. Kolay gelsin.
    Bağlantıda problemim yok.
    Bağlantı kurdum, databasedeki sorgular da çalışıyor ama şimdi görsel olarak mesela textbox'a yazı yazıcam, onu butona basınca database'ye insert into yapacak. Bunu yapmak istiyorum.

    Mesela araba markaları var, checkboxdan o araba markasını seçip, textboxa arabanın id'sini yazıcam mesela, butona basınca databaseye ekleyecek.

    Bu konuda yardımcı olabilecek var mı?
  • 06-01-2011, 00:51:08
    #6
    hic yoktan arayuzu koysaydın ve database deki tabloları vs olsaydı yardımcı olabilirdik.
  • 10-01-2011, 00:29:28
    #7
    Kimlik doğrulama veya yönetimden onay bekliyor.
    Sana Örneği Vereyim Ama Ben Kendi Kod Sistemimde Yazıyorum Onu Düzenlersin.

    Dim StrConn As New SqlConnection(ConfigurationManager.ConnectionStrin gs("SqlServer").ToString())

    Dim CmdString As String = "Insert Into [Tablo_Adı] (alan_1,alan_2,alan_3) Values (@a1,@a2,@a3)"
    Dim StrComm As New SqlCommand(CmdString, StrConn)
    StrComm.Parameters.AddWithValue("@a1", TextBox1.Text)
    StrComm.Parameters.AddWithValue("@a2", TextBox2.Text)
    StrComm.Parameters.AddWithValue("@a3", TextBox3.Text)
    If StrConn.State = Closed = True Then
    StrConn.Open()
    End If
    StrComm.ExecuteNonQuery()
    StrConn.Close()

    Bu Kodu Butonun İçine Yapıştırsan Çalışmaktadır Ben Db Yolunu Web.Config den çekiyorum 3 adet parametre atadım bu parametreleri de textboxlardan alıyorum ... anladın sanırım