İşlem, güncelleştirilebilir sorgu kullanmalıdır.
İşlem, güncelleştirilebilir sorgu kullanmalıdır.
Aşağıdaki kodda hata nerede acaba
Var MyConnect:OleDBConnection;
MyCommand:OleDBCommand;
RNo,DNo,Tarih,Saat,Durum :String;
begin
MyConnect:=oleDbConnection.Create('Provider=microsoft.Jet.OLEDB.4.0;'+'data source='+
Server.MapPath('PROSER.mdb'));
MyCommand := OleDbCommand.Create;
MyConnect.Open;
MyCommand := OleDbCommand.Create;
MyCommand.Connection := MyConnect;
RNo := '2';
DNo := '100';
Tarih := '01.01.2001';
Saat := '08:30';
Durum := '1';
MyCommand.CommandText := 'INSERT INTO RANDEVU (RNo,DosyaNo,Tarih,Saat,Aktif)'+
' VALUES ('+RNo+','+DNo+','+#39+Tarih+#39+','+#39+','+Saat+#39+','+Durum+')';
MyCommand.ExecuteReader;
Var MyConnect:OleDBConnection;
MyCommand:OleDBCommand;
RNo,DNo,Tarih,Saat,Durum :String;
begin
MyConnect:=oleDbConnection.Create('Provider=microsoft.Jet.OLEDB.4.0;'+'data source='+
Server.MapPath('PROSER.mdb'));
MyCommand := OleDbCommand.Create;
MyConnect.Open;
MyCommand := OleDbCommand.Create;
MyCommand.Connection := MyConnect;
RNo := '2';
DNo := '100';
Tarih := '01.01.2001';
Saat := '08:30';
Durum := '1';
MyCommand.CommandText := 'INSERT INTO RANDEVU (RNo,DosyaNo,Tarih,Saat,Aktif)'+
' VALUES ('+RNo+','+DNo+','+#39+Tarih+#39+','+#39+','+Saat+#39+','+Durum+')';
MyCommand.ExecuteReader;
hocam sql ifadesini bir stringe atarsan, debug yaptığında sql almış olduğu derğerleri görür ve hangi veritabanıyla çalışıyorsan orada dener hata tespit edersin.
Kod: Tümünü seç
var
s:string;
begin
s:=sql;
end;
Parametre
peki Parametre olarak kullanamıyormuyuz. yani.
Delphi deki gibi
with MYSQL do begin
sql.text := INSERT INTO TABLO (A1,A2) VALUES (:A1,:A2) ';
PARAMBYNAME('A1').VALUES :=' ';
PARAMBYNAME('A2').VALUES :=' ';
EXCELSQL;
end;
Delphi deki gibi
with MYSQL do begin
sql.text := INSERT INTO TABLO (A1,A2) VALUES (:A1,:A2) ';
PARAMBYNAME('A1').VALUES :=' ';
PARAMBYNAME('A2').VALUES :=' ';
EXCELSQL;
end;
hocam parametreyle falan uğraşmaya gerek yok.ama parametre olayı delphi 7 deki değil.sen en iyisi şöyle yap.
iki fieldla bir dene.büyük bir ihtimalle tırnaklardan kaynaklı hata veriyordur. aynen benim yazdığım gibi bir dene.
Kod: Tümünü seç
S:='INSERT INTO RANDEVU (RNo,DosyaNo) Values ('+RNo+','DosyaNo')';
MyCommand.CommandText:=s;
Kod: Tümünü seç
'+DosyaNo+'
İlginiz için teşekkürler
ancak.. tüm tırnaklara dikket etsem de.. bu hata mesajını almaktan kurtulamadım. sorun kod da mı? sistemde mi?
Bu sorunu hallettim sorun SQLString'te Değil
Bu sorunu hallettim sorun SQLString'te Değil IIS Ayarlarında bu kodlar localde çalışıyor webe taşıdığım zaman çalışmıyor. Formun bir yerinde host firmasından kaynaklandığı yazılmış.. sanırım firmanın da Firma fazla bir bilgisi yok.. Host firması ne gibi ayarlar yapmalıdır. 
