Visual Basic Web Bağlantısı

Başlatan kaan34, 09 Ocak 2013, 01:41:31

kaan34

Merhabalar Arkadaşlar,

Mikrodenetleyici ile haberleşerek aldığım veriyi TextBox'a yazıyorum. Ben bu veriyi internette bir veri tabanına yazmak istiyorum. MySql ile ilgili pek bir bilgim olmadığı için de linkteki adımları takip ettim http://blog.ehocam.com/2010/05/vb-net-ile-mysql-veritabanina-baglanti-kurmak.html.
Imports MySql.Data.MySqlClient

Public Class Form1

    Dim baglanti_dizisi As New MySqlConnectionStringBuilder

    Dim mysql_baglanti As New MySqlConnection
.....


Error   1   'MySqlConnectionStringBuilder' is ambiguous in the namespace 'MySql.Data.MySqlClient'.
Error   2   'MySqlConnection' is ambiguous in the namespace 'MySql.Data.MySqlClient'.


Diğer aşamalara geçemeden yukarıdaki koddan, bu hataları alıyorum. Add Reference girip MySqlData.Dll yi yüklemeye çalışınca dosya bulunamıyor.(dosyayı c klasöründe buluyorum ve seçiyorum, fakat eklenmiyor) MySql Connector 32 bitlik, benim kullandığım sürüm 64 bitlik. Bununla ilgisi varmıdır. Nerde hata yapıyorum? Veya VB MySql bağlantısı için alternatif önerileriniz varmıdır? Yardımcı olabilirseniz çok sevinirim.

0xefe

Merhaba, forumda ilk mesajım. Geçen yıl bir süre Visual Basic 2010 .net ile mysql veri tabanı işlemleri yaptım. Öncelikle 64 bit işletim sistemi için ayrıca bir MySQL Connector Net paketi yok. Kurulum paketi 32 bit ancak dll'ler 32 ve 64 bit uyumlu.
Program kodlarımdan mysql ile ilgili yerleri kırptım, aşağıdaki gibidir:

Imports System.Threading
Imports System.IO
Imports MySql.Data.MySqlClient 'mySQL Windows data connector ekleme
'mySQL Windows data connector'ü mysql sitesinden indir ve kur bendeki sürüm: MySQL Connector Net 6.5.4
'Visual Basic 2010 menülerinden -> Project>Add Reference...Browse> C:\Program Files\MySQL\MySQL Connector Net 6.5.4\Assemblies\v4.0\MySql.Data.dll 'i ekle (sizde program files (x86) altında olmalı)

Public Class Form1
    '************Bağlantı bilgileri, connection string tanımlama*************
    '**********sunucu adresi, database adı, kullanıcı adı ve şifre***********
    Dim con As MySqlConnection = New MySqlConnection("Data Source=mysql server domain or ip;Database=dbname;User ID=username;Password=12345;")
    Dim DataAdapter1 As MySqlDataAdapter = New MySqlDataAdapter()
    Dim Comb As MySqlCommandBuilder
    '************************************************************

  Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'mysql insert button
        Dim MyCommand As New MySqlCommand
        con.Open()
        MyCommand.Connection = con
        MyCommand.CommandText = txtQuery.Text 'sorguyu yükle
        MyCommand.ExecuteNonQuery() 'sorguyu çalıştır. Ben insert/update yaptığım için nonquery çalışıyor.
        con.Close()
        TextBox1.Text = Date.Now & " Record successfully added!" & vbNewLine & TextBox1.Text
    End Sub

'kodun
'buraya 
'gelir
End Class


sorgu (kısalttım hatalar olabilir)
açıklama: insert into tablo_adı (sütun1, sütun2, sütun3, sütun4)  VALUES (değer1, değer2, değer3, değer4)
txtQuery.Text = INSERT INTO Country4320121 (eTime, GoldSeller1, GoldAmount1, GoldRate1) VALUES ('4/16/2012 09:36:58' , ' oyuncu' , '48.99' , '1705.000')


Alternatif online veri tabanı olarak Google Fusion Tables kullanabilirsin. Kolayca grafik/widget oluşturma gibi güzellikleri var, tavsiye ederim. Fusion tables için yine .netle http post, get, auth, token vs işlemler yapman gerekiyor. Göndereceğin sorgu formatı yine aynı.