Direkomendasikan: Kode Program Pemutar Video Web Kode Umum When making a program for the customer, I suddenly encountered a problem, that is, when the user of the product page submitted a video playback file, how to play the correct video format in the submitted URL... I was depressed for a while, and thought about the idea, and then I started to do it... The idea is to get the file type first,
Pertama, gunakan akses untuk membuat database baru , atur nama ke Luntan, nama tabel data ke informasi, buat bidang berikut: teks, nama, waktu, dan atur nilai default waktu untuk sekarang
| Berikut ini adalah konten yang dikutip: <% Setel com = server.CreateObject (adodb.connection) com.opendriver = {driver Microsoft Access (luntan.mdb); pwd = informasi; dbq = & server.mappath (luntan.mdb) SQL = SELECT*Dari Pesanan Informasi demi Desc Time Set RS = Server.CreateObject (adodb.recordest) Rs.open SQL, com, 3,2 Jika rs.eof atau rs.bof maka respons. Menulis tidak ada komentar kalau tidak rs.movefirst sementara tidak rs.eof. Response.Write RS (Nama) & Diterbitkan di & RS (Waktu) & <br> response.write rs (teks) & <br> <hr> rs.movenext pergi ke Absoluteposition = n, (n = 1,2,3 ......) akhiri jika %> Berikutnya adalah bagian penulisan pesan pengguna. Misalkan halaman forum adalah informasi.asp, lalu <Metode form = post action = Information.asp> Nama: <Input Jenis = Ukuran Teks = 12 Nama = Nama> <br> Tinggalkan pesan: <textarea cols = 30 baris = 4 name = text> </textarea> <br> <Input Tipe = Kirim Nilai = Kirim> </form> |
Bagian terakhir adalah merekam data formulir yang dikirimkan oleh pengguna ke dalam database,
Berikut ini adalah konten yang dikutip: <% Jika permintaan (teks) <> kosong dan permintaan (nama) <> kosong lalu Set Comb = Server.CreateObject (AdodB.Connection) cob.opendriver = {driver akses microsoft (*. mdb)}; pwd = informasi; Dbq = & server.mappath (luntan.mdb) SQL = Pilih*dari Informasi Set RSB = Server.CreateObject (AdodB.Recordset) RSB.Open SQL, sisir, 3,2 rsb.addnew rsb (teks) = permintaan (teks) rsb (name) = request (name) RSB.update akhiri jika %> |
Bagikan: Dua Desain Pengunjung Pengunjung yang Menarik Sebagai bagian yang sangat diperlukan dari situs web, penghitung pengunjung tidak hanya dapat merekam berapa kali situs web dikunjungi, tetapi juga meningkatkan kesenangan dan kemampuan dipandang dari halaman web melalui desain yang jelas dan menarik, membuat pengunjung melawan lanskap di halaman web. Berikut ini adalah dua desain yang mudah menyenangkan