Ana içeriğe atla

.accdb veri tabanı örnekleri

 


Private Sub ComboBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

Dim baglan As New Connection   'veri tabanına bağlanma
Dim rs As New Recordset        'veri tabanına yeni kayıt

'baglan.Open "Provider=Microsoft.Ace.Oledb.12.0 veri tabanına bağlanma referans kod
'data source=C:\Users\SAVAS\Desktop\master.accdb;" işlenecek veri taban bağlantısı
baglan.Open "Provider=Microsoft.Ace.Oledb.12.0;data source=C:\Users\SAVAS\Desktop\master.accdb;"
'rs.Open "select firmaadi from firmalar where firmaadi LIKE '" & ComboBox1.Text & "%'",  veri tabanında yer alan kolon isimleri aynen alduğu gibi yazılmalı

'rs.Open "select firmaadi from firmalar where firmaadi LIKE '" & ComboBox1.Text & "%'", bu alanda combobox1 alanı içine veri tabanında yer alan metinleri yüzdelik % sayesinde metinleri girmeye başladığım anda ifadeleri içeren tüm kayıtları getirmeye başlar

'rs.Open "select firmaadi from firmalar  buradaki firmaadi veritabanı tablo adı değil.Veri tabanı tablo adı olan firmalar tablosu içinde ki firmalar sütunu...... almış olduğum hata vardı bu sebepten kaynaklı :)

rs.Open "select firmaadi from firmalar where firmaadi LIKE '" & ComboBox1.Text & "%'", baglan, adOpenKeyset, adLockPessimistic

With alsatform.ComboBox1
.Column = rs.GetRows
End With


rs.Close
baglan.Close

End Sub

Private Sub Image1_click()  'yeni kayıt için eklemiş olduğum fotoğrafa tıklandığında anaformumda bulunan yenikayıt formuna gitmesi için aşağıda ki kodu da dahil ettim
anaform.MultiPage1.Value = 3  'anaformda gitmesini istediğim sekmeyi sıfır dahil sayarak index değerini (value) ayarlandı
alsatform.Hide
End Sub









Etiketler:

Yorumlar

Yorum Gönder

Bu blogdaki popüler yayınlar

C# Delete

//using System.Data.SqlClient; //Yeni Güncelleme geldi //Araçlar>NuGet Paket Yöneticisi>Paket yöneticisi Konsole //Install-Package Microsoft.Data.SqlClient //Kodu Yapıştırdık //using System.Data.SqlClient;  Microsoft.Data.SqlClient şeklinde değiştir ve Sorun Çözüldü //Problem SqlConnection bağlantısının altı ve üzeri çizili idi yeni version 9 geldiği için yukarıdaki değişiklikler yapıldı using Microsoft.Data.SqlClient; namespace Update {     public partial class Form1 : Form     {         SqlConnection sqlBaglanti = new SqlConnection(@"Data Source=DESKTOP-0B1GIRL\SQLEXPRESS;Initial Catalog=TestVT;Integrated Security=True;TrustServerCertificate=True");         public Form1()         {             InitializeComponent();         }         //Güncelleme İşlemi         private void button1_Click(object sender, Even...
Yorum Gönder
Devamı

C# Forms ve ADO.NET ile SQL Server 2022'de SQLConnection bağlantısı ile INSERT İşlemi

// SQL bağlantı yolu için sistem paketinin yüklenmesi using System; using System.Data.SqlClient; using System.Windows.Forms; namespace VeriTabanıTestProjesi {     public partial class Form1 : Form     {         // SQL bağlantı nesnesinin tanımlanması         SqlConnection sqlBaglanti = new SqlConnection(@"Data Source=DESKTOP-0B1GIRL\SQLEXPRESS;Initial Catalog=TestVT;Integrated Security=True");         public Form1()         {             InitializeComponent();         }         private void button1_Click(object sender, EventArgs e)         {             // Veri Tabanında oluşabilecek hataların yakalanması             try             {                 // SQL bağlantısının a...
Yorum Gönder
Devamı

Microsoft.Data.SqlClient Örnek VeriTabanı

using System; using System.Data; using Microsoft.Data.SqlClient;//Install-Package Microsoft.Data.SqlClient using System.Windows.Forms; namespace Sql_Try {     public partial class Form1 : Form     {         SqlConnection sqlVT = new SqlConnection(@"Data Source=DESKTOP-0B1GIRL;Initial Catalog=My_Form;Integrated Security=True;Encrypt=True;Trust Server Certificate=True");         public Form1()         {             InitializeComponent();         }         private void button2_Click(object sender, EventArgs e)         {             Application.Exit();         }         private void button1_Click(object sender, EventArgs e)         {             string Name = textBox_isim.Text;         ...
Yorum Gönder
Devamı