Arsip: ada yang tau syntax memasukkan data real ke tabel sql ?

more 17 years ago
micrens
koneksiku memakai ado
syntaxku:
var
nilai1,nilai2 :array of real;
begin
nilai1[1,1]:=0,556;
nilai2[1,2]:=0,576;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='insert into tabel_matriks values('+quotedstr(id)+',nilai1[1,1],nilai2[1,2])';
adoquery1.execsql;
end;
errornya: tidak boleh memakai nilai1 nilai 2 dalam sql.text.
ada yg tau penulisan syntax untuk memasukkan nilai1,nilai2 ke tabelku?trims

more 17 years ago
nurez
katcaw... sc nya..
try this := ('kY iklan AjHa :)',mticonfirm[0], no);
var
nilai1,nilai2:real;
begin
nilai1.text:=str to float(nilai1.text);
with adoquery1 do
sql.text:='insert into tabel_matriks values '+' ('+quotedstr(nilai1)';
parameters[0].value:=nilai1.text;
yaa coba deh... klo msha da yg salah.? search ajha keynya insert

more 17 years ago
imunk
@nurez
kalo jawab thread tolong di cek dulu kodingnya....
kayaknya ada yang salah bro......xixixixixixixi
@micrens
ada yg kurang, field di tabelnya bertipe apa? real atau text.
jika bertipe real:
var
nilai1,nilai2 :array of real;
begin
nilai1[1,1]:=0,556;
nilai2[1,2]:=0,576;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='insert into tabel_matriks values('+quotedstr(id)+','+floattostr(nilai1[1,1])+','+floattostr(nilai2[1,2])+')';
adoquery1.execsql;
end;
jika bertipe text (char/varchar):
var
nilai1,nilai2 :array of real;
begin
nilai1[1,1]:=0,556;
nilai2[1,2]:=0,576;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='insert into tabel_matriks values('+quotedstr(id)+','+quotedstr(floattostr(nilai1[1,1]))+','+quotedstr(floattostr(nilai2[1,2]))+')';
adoquery1.execsql;
end;
mungkin para senior ada yg mau mengoreksi lagi......
terima kasih dan semoga membantu..
more 17 years ago
46uh
perbaiki aja
adoquery1.sql.text:='insert into tabel_matriks values('+quotedstr(id)+ ',' + floattostr(nilai1[1,1])+ ',' + floattostr(nilai2[1,2])+')';
check lagi klo ada salah !!!
more 17 years ago
imunk
itu perbaikan yg mana mas
kayaknya sudah sama dg yg aku bikin.
kalo itu merupakan perbaikan syntax yg bawah, malah aku salahkan kenapa??
karena disitu aku tuliskan jika field tabel bertipe text(char/varchar) nah jika tipenya text perlu adanya perintah quotedstr, utk menghandle jika ada koma.
gitu.... mungkin yg lain ada yg mau koreksi lagi..

more 17 years ago
DelphiExpert
@micrens: that was bad idea!
memasukkan 'real data' ke sql syntax tidak disarankan karena masing2 DB vendor mempunyai tipe & format data tidak sama.
kecuali sql yg dikau buat memang ditujukan khusus ke DB vendor tertentu, MySQL/Access misal, maka data yg dimasukkan ke dalam
sql syntax harus sesuai dengan format data vendor yg bersangkutan. Hal ini akan menyulitkan jika suatu saat dikau harus porting
ke DB Vendor lain.
Tidak ada alasan yg pantas utk tetap menggunakan hard-coded data value ke sql query.
gunakan fasilitas Parameters, implementasi tiap2 vendor sudah menyesuaikan dengan format data mereka.
kalau ada cara lebih mudah kenapa cari yg sulit? tapi itu semua terserah dikau :mrgreen:

more 17 years ago
mbahdien
biasanya untuk database bilangan real pemisah desimalnya pakai titik, so bila itu di implementasikan ke delphi kita harus buat
fungsi yg bisa ngrubah koma ke titik.
Coba aja fungsi berikut:
function Tform1.konversi(x:real):string;
VAR S:STRING;
begin
str(x:0:2,S);
RESULT:=S;
END;// untuk angka 2 bisa di ganti sembarang tergantung mo berapa angka desimal di belakang koma
trus masukin aja fungsi tersebut

more 17 years ago
46uh
@imunk: itu perbaikan yg mana mas kayaknya sudah sama dg yg aku bikin. kalo itu merupakan perbaikan syntax yg bawah, malah aku salahkan kenapa?? karena disitu aku tuliskan jika field tabel bertipe text(char/varchar) nah jika tipenya text perlu adanya perintah quotedstr, utk menghandle jika ada koma. gitu.... mungkin yg lain ada yg mau koreksi lagi..:oops: yap itu terjadi karna buka thread bersamaan tapi posting nya keduluan...

more 17 years ago
imunk
@46uh
oh kirain koreksi postingku... yo wes....kekekekekeke
@delphiexpert
kalo senior alias suhu sudah bilang gitu aku mah ngikut aja deeeeehhh.......
tapi kalo mau 'njebur' kali ntar dulu ye........kekekekekekeke....
@mbahdien
no comment
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- Size Kaos Biar Nga Trouble
by saysansay in Hal umum tentang Pascal Indonesia more 18 years ago - Ga bisa double click di button
by Random in Hal umum tentang Pascal Indonesia more 17 years ago - AQ3: Cannot Perform this operation an a closed dataset
by ade_jm in Hal umum tentang Pascal Indonesia more 12 years ago - Tolong kasih pencerahan.......
by Zulkarnain in Tip n Trik Pemrograman more 18 years ago - flowchart program aplikasi toko bangunan
by musespratama in Lain-lain more 13 years ago - bingung sistem pelayaran (rute)
by iwanted in Tip n Trik Pemrograman more 14 years ago - Menampilkan data terakhir
by kepiss in Lain-lain more 13 years ago - Componen mendapatkan serial number harddisk
by jimmy_chenchen in Hal umum tentang Pascal Indonesia more 18 years ago - kontrol photoshop delphi
by gatotkaca in Multimedia & Graphic Enhancement more 16 years ago - Contoh Program Penjualan + Inventory
by andip70 in Hal umum tentang Pascal Indonesia more 17 years ago