kodları çalıştırma vb6

[Fuat Şirin]

INSERT INTO SAT1
SELECT SATIŞS.*
FROM SATIŞS;

değerli hocalarım
yukardaki kodları vb6da nasıl çalıştırabilirim

işlemi yaptığımda kopyalamyı tetikleyecek nedir

saygılar

 

[modalı]

Sayın Fua Şirin,

Private Sub cmdsearch_Click()
Dim adoconnection As ADODB.Connection
Dim  adorecordset As ADODB.Recordset
Dim connectstring As String
Dim sql As  Variant

Set adoconnection = New ADODB.Connection
Set adorecordset =  New ADODB.Recordset

connectstring = "Provider=Microsoft.Jet.OLEDB.4.0;"  _
   & "Data Source=C:\db1.mdb"

   adoconnection.Open  connectstring
   adoconnection.[COLOR=#0000bb]Execute [/COLOR][COLOR=#dd0000]"INSERT INTO SAT1 SATIŞS.*  FROM SATIŞS"[/COLOR]
  
   adoconnection.Close

       Set  adorecordset = Nothing
       Set adoconnection = Nothing

End Sub

Bu vb6 dan bir sql cümlesini çalıştırma kodu. Ancak öncelikle tavsiye edeceğim şey, tablo, alan vs gibi elemanların isimlerinde Türkçe karakterler kullanmamanız.

 

[Fuat Şirin]

adoconnection.Execute "INSERT INTO SAT1 SATIŞS.* FROM SATIŞS"

bu satırda hata vermesinin nedeni acaba türkçe karakter midir

 

[modalı]

İlk şart Türkçe karakter kullanmamak. Ama bir de şöyle deneyin:

"INSERT INTO SAT1 SELECT SATIŞS.*  FROM SATIŞS"

Sanırım SELECT eksik.

 

[Fuat Şirin]

syn Modalı ;

Çok Teşekkür Ediyorum

Saolun