Direkomendasikan: ASP membaca file teks dan menampilkannya html head http-equiv = konten-tipe konten = teks/html; Charset = GB2312 Judul /Judul /Kepala Badan % Bahasa = VBScript % % Const Forreading = 1, Forwriting = 2, Forprespending = 8 Const TristateusedEfault = -2, Tristatetrue = -1, TristateFalse
| < % Set RS = Server.CreateObject (ADODB.Recordset) db = db.mdb 'Cukup ubah nama basis data secara langsung dan Anda akan melihat efeknya. Set Conn = Server.CreateObject (AdodB.Connection) connstr = provider = microsoft.jet.oledb.4.0; Sumber data = & server.mappath (db) Conn.open Connstr Set RS = Conn.openschema (20) Lakukan sampai rs.eof Jika Rs (3) = tabel lalu Response.Write Nama tabel: & rs (2) & <br /> Set RS1 = Server.CreateObject (ADODB.Recordset) SQL = SELECT * from & rs (2) Set RS1 = Conn.Execute (SQL) response.write nama bidang: Untuk i = 0 hingga rs1.fields.count-1 response.write rs1.fields (i) .name & Berikutnya Response.write <br /> Lakukan sementara bukan rs1.eof respons.write Untuk i = 0 hingga rs1.fields.count-1 t = rs1.fields (i) .name response.write rs1 (t) & Berikutnya respons.write RS1.Movenext Lingkaran respons.write Akhiri jika rs.movenext Lingkaran Setel RS = tidak ada Atur conn = tidak ada %> |
Bagikan: Cara menggunakan instrrev () untuk mendapatkan nama file di ASP Fungsi instrrev dimulai dari pencarian terakhir dari string, dan merupakan string sebelumnya. % Redup strtxt, pos strtxt = www.webjx.com pos = instrrev (strtxt ,.) response.write pos % awal pencarian kami adalah dalam urutan terbalik, dari titik sebelum com. Panjang karakter awal, termasuk titik ini, memiliki total sepuluh karakter, dan hasilnya yang dikembalikan akan menjadi 9. Pass