Direkomendasikan: Diskusi singkat tentang prinsip Program Akuisisi ASP Langkah -langkah utama dari program pengumpulan adalah sebagai berikut: 1. Dapatkan konten dari halaman 2 yang dikumpulkan. Ekstrak semua data dari kode akuisisi 1. Dapatkan konten dari halaman yang dikumpulkan yang saat ini saya ketahui tentang ASP yang umum digunakan metode untuk mendapatkan halaman yang dikumpulkan: 1.
Skrip verifikasi login pengguna, chkpwd.asp
Berikut ini adalah konten yang dikutip:
<%
'========= skrip verifikasi login pengguna ========
'Jika objek yang dilewati belum ditentukan, itu didefinisikan sebagai salah, menunjukkan bahwa itu belum melewati verifikasi
Jika isempty (sesi (lulus)) lalu
Sesi (lulus) = false
Akhiri jika
'Sesi (Lulus) = Salah, yang berarti bahwa informasi verifikasi yang ditularkan dari formulir belum disahkan.
Jika sesi (lulus) = false maka
Username = request.form (nama pengguna)
Userpwd = request.form (userpwd)
Jika nama pengguna = maka
ERRMSG = Tip: Harap masukkan nama pengguna dan kata sandi Anda
Kalau tidak
'=====================================================
Set Conn = Server.CreateObject (AdodB.Connection)
Conn.connectionstring = driver = {sql server}; server = 192.168.1.3; uid = SA; pwd =; database = zcmrs
Conn.open
'============================= Baca data pengguna dari log tabel ==========================
'Tentukan objek Recordset
Set RS = Server.CreateObject (ADODB.Recordset)
'Atur Connectionstring Objek Koneksi
Atur rs.activeConnection = Conn
'Atur tipe kursor
Rs.CursorType = 3
'Buka set rekaman
rs.open pilih nama pengguna, kata sandi dari erpuser di mana nama pengguna = '& nama pengguna &'
'=====================================================
Jika rs.eof maka
Errmsg = tip: pengguna tidak ada atau kata sandi salah
Kalau tidak
Jika userpwd <> rs.fields (kata sandi) maka
ERRMSG = Tip: Login Gagal! Kesalahan Kata Sandi?
Lain 'Login berhasil
Errmsg =
Sesi (lulus) = true
Sesi (nama pengguna) = rs.fields (nama pengguna)
'Identifikasi sesi izin pengguna (userId) = rs.fields (userid)
Akhiri jika
Akhiri jika
Akhiri jika
Akhiri jika
'Setelah login gagal, formulir login akan ditarik
Jika tidak sesi (lulus) = true maka
%>
<Html>
<head> <title> unt judul dokumen </iteme>
<Tipe Gaya = Teks/CSS>
<!-
.Style1 {font-size: 12px; font-weight: bold; margin-left: 120px; outline: double}
->
</tyle>
<Tipe Gaya = Teks/CSS>
<!-
.Style2 {font-size: 12px; font-weight: bold; outline: double; color:#ff3333}
->
</tyle>
</head>
<body leftmargin = 0 topmargin = 0 marginheight = 0 marginwidth = 0 bgcolor =#000000>
<Div ID = gaya induk = tinggi: 300; Lebar: 450; gaya perbatasan: solid; border-color: #fffff; margin-top: 80px; margin-kiri: 25%; margin-kanan: 25%; latar belakang-warna: #fffff>
<Div ID = Denglu Style = font-size: 12px; font-weight: bold; latar belakang-warna:#0099ff; Teks-Align: tengah; Tinggi: 40px;> <br> Login sistem ERP </div>
<Form Action = <%= request.serverVariable (path_info)%> Metode = nama pos = myForm id = myForm>
<p class = style1> username: <input name = Username type = Text ID = Username size = 18 maxlength = 20>
</p>
<p class = style1> Kata sandi: <input name = Userpwd type = Kata sandi id = UserPWD size = 18 maxlength = 20>
</p>
<p align = center class = style2> <%= errmsg%> </p>
<p>
<Input Tipe = Kirim Align = Nama Tengah = Kirim Nilai = Masuk ke Sistem>
<input name = rege type = tombol align = middle onClick = location = 'register.asp' id = rege value = register user>
</p>
</form>
</div>
</body>
</html>
<%
'<p class = style1> kode verifikasi: <input name = checkCode type = Text ID = checkCode size = 6 maxlength = 4>
'<Img style = margin-right: 40px alt = src = common/getCode.asp> </p>
respons.end
Akhiri jika
%>
Halaman untuk mengunjungi erp.asp
<Berikut ini adalah konten yang dikutip:
<!-#Sertakan file = chkpwd.asp->
<body>
<Div style = 'font-size: 12px; font-weight: bold; border: 1px solid #001; padding: 4px; latar belakang: #ffccff; margin-top: 0;'> Selamat datang menggunakan sistem kueri ERP, pengguna yang masuk saat ini adalah:
<%
Jika sesi (lulus) = true maka
Response.write (sesi (nama pengguna))
Akhiri jika
%> <a href = logout.asp> keluar dari sistem </a>
</div>
</body>
Setiap kali Anda membuka ERP.ASP, Anda terlebih dahulu menjalankan chkpwd.asp (), yang secara efektif dapat mencegah pengguna yang tidak sah mengakses halaman web yang ditentukan.
Logout.asp System Exit
<body>
<%
Sesi (lulus) = false
Sesi (nama pengguna) =
Response.redirect (index.asp)
%>
</body>
Kirim formulir menggunakan gambar
Berikut ini adalah konten yang dikutip:
<Form name = Metode Form1 = Post Action =>
<td align = right> <input type = Metode gambar = Kirim Nama = Kirim SRC = Image/Loginin.GIF Lebar = 70 Tinggi = 21 Alt = Kirim> </td>
</form>
Bagikan: Asp dan tautan akses Artikel ini menggambarkan dua cara menghubungkan ASP dan akses dalam contoh ASP. Berikut ini adalah konten yang direferensikan: %redup dd, connstrdd = data.mdbconnstr = & q