Tutorial ASP: Beberapa pengetahuan yang diperlukan untuk setiap programmer ASP
Koneksi basis data:
Berikut isi kutipannya:
<%
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
%>
Buka basis data:
Berikut isi kutipannya:
exec=pilih * dari tabel database
set rs=server.createobject(adodb.recordset)
rs.open exec,sambungan,1,1
Parameter 1, 1 dibaca
Baca format konten: <%=rs(field)%>
Tambahkan pengendali rekaman:
Berikut isi kutipannya:
<%
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
nama=permintaan.form (bidang) nama, telp, pesan adalah nilai bidang yang ditetapkan untuk mengirimkan formulir
telp=permintaan.form(bidang)
pesan=permintaan.formulir(bidang)
exec=masukkan ke dalam nama tabel (bidang) nilai ('+bidang+') kelipatan dipisahkan dengan koma
conn.execute exec menggunakan eksekusi untuk mengirimkan
samb.tutup
setel samb=tidak ada
%>
Penangan pencarian:
Berikut isi kutipannya:
<%
name=request.form(field) name,tel adalah nilai bidang yang ditetapkan untuk mengirimkan formulir
telp=permintaan.form(bidang)
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
exec=pilih * dari tabel di mana nama='+bidang+' dan tel=+bidang
set rs=server.createobject(adodb.recordset)
rs.open exec,sambungan,1,1
%>
'Ekspor konten yang dicari di halaman
<%
lakukan selagi tidak rs.eof
%><tr>
<td><%=rs(nama)%></td>
<td><%=rs(tel)%></td>
<td><%=rs(waktu)%></td>
</tr>
<%
rs.movenext
lingkaran
%>
Hapus pengendali rekaman:
Berikut isi kutipannya:
<%
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
exec=hapus * dari nama tabel di mana number=&request.form(id)
samb.eksekusi eksekutif
%>
Ubah pengendali rekaman:
Berikut isi kutipannya:
<%
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
exec=pilih * dari nama tabel di mana nomor=&request.form(id)
set rs=server.createobject(adodb.recordset)
rs.open exec,conn,1,3 '1,3 adalah untuk mengubah artinya
rs(name)=request.form(field) 'name,tel,message adalah nilai bidang yang ditetapkan untuk mengirimkan formulir
rs(tel)=permintaan.form(bidang)
rs(pesan)=permintaan.form(bidang)
rs.update
rs.tutup
atur rs=tidak ada
samb.tutup
setel samb=tidak ada
%>
Ubah program eksekusi rekaman: Masukkan halaman nomor ID>>>>Ekspor data ID yang sesuai>>>>>>Prosesor untuk modifikasi langsung
Contoh pengendali login latar belakang:
Berikut isi kutipannya:
<%
nama redup, kata sandi
nama=permintaan.formulir(nama)
kata sandi=permintaan.form(kata sandi)
redup eksekutif, samb, rs
exec=pilih *dari nama tabel di mana(nama='&bidang&' dan kata sandi='&bidang&')
setel koneksi=server.buat objek(adodb.koneksi)
conn.open driver={microsoft access driver (*.mdb)};dbq=&server.mappath(nama database)
set rs=server.createobject(adodb.recordset)
rs.open exec, samb
jika bukan rs.eof maka
rs.Tutup
samb.Tutup
sesi (dicentang) = ya
sesi(centang)=kanan
respon.Alihkan indeks.asp
kalau tidak
sesi (dicentang) = tidak
sesi(centang)=salah
respon.Redirect login.asp
berakhir jika
%>
Tambahkan ke setiap halaman backend:
<%if not session(checked)=yes maka 'tentukan variabel string yang dicentang dalam sesi
respon.Redirect login.asp
kalau tidak
%>