Kami sering mengalami beberapa masalah kueri, dan pernyataan SQL yang panjang sering membuat orang merasa bingung. Terutama ketika klien sebagian diisi dalam kondisi kueri, akan lebih sulit untuk menggunakan metode biasa.
Berikut ini dengan cerdik menggunakan pembentukan konstan di mana 1 = 1 (pada kenyataannya, sehingga nilainya benar) untuk menyelesaikan masalah ini.
Ringkasan:
'Judul Informasi Subjek
'Perusahaan menerbitkan nama perusahaan
'Konten Informasi Menerbitkan Konten
Alamat alamat perusahaan
Pengantar 'Infomation
'Perhatikan instruksi terkait
Nilai -nilai di atas dikirimkan berdasarkan formulir, dan kemudian dilewati: subjek = trim (request.Form (subjek)), dll. Untuk mendapatkan nilai yang sesuai.
<%
'Fungsi ini sangat penting!
Fungsi SQL (A, B, SQLS)
Jika B <> maka 'jika klien tidak mengirimkan nilai ini, pernyataan SQL yang sesuai tidak akan dihasilkan.
sqls = sqls & dan & a & seperti ' % & b & %'
akhiri jika
SQL = SQLS
Fungsi akhir
'----------------- Hubungi database
Set Conn = Server.CreateObject (AdodB.Connection)
Dbpath = server.mappath (/database/mydb.mdb)
Conn.open driver = {Microsoft Access Driver (*.MDB)};
Set RS = Server.CreateObject (ADODB.OLDSET)
SQLS = SELECT * Dari mytable di mana 1 = 1
'Panggilan berikut dapat dipanggil di atas, dan banyak panggilan dapat dipanggil (secara teoritis sewenang -wenang)
SQLS = SQL (Subjek, Subjek, SQLS)
SQLS = SQL (Perusahaan, Perusahaan, SQLS)
SQLS = SQL (Konten, Konten, SQLS)
SQLS = SQL (Alamat, Alamat, SQLS)
SQLS = SQL (Infomation, Infomation, SQLS)
sqls = sql (note, note, sqls)
Sqls = sqls & order by id desc
Rs.oopen SQLS, Conn, 3,2
%>
Kesimpulan: Jika tidak ada fungsi fungsi kunci SQL (A, B, SQLS), kita dapat membayangkan berapa banyak penilaian yang perlu menilai satu demi satu!