Menyelesaikan situs web WAP yang sederhana dan berguna - Alamat permintaan lokasi nomor ponsel versi WAP: http://hikey.net/wap
Gunakan ponsel yang mendukung WAP untuk melihatnya. Tidak mendukung IE.
Jika ponsel Anda tidak mendukung WAP atau Anda tidak bersedia membayar beberapa sen, Anda dapat menggunakan emulator yang disediakan oleh gelon.net untuk melihat karya saya. .
Langsung saja buka alamat ini
http://www.gelon.net/cgi-bin/wapalize.cgi?url=http://hikey.net/wap
//Pengkodean IE harus dalam bahasa Mandarin Sederhana.
//Tekan roda gulir untuk menggulir layar ke bawah.
gambar
dan tidak banyak kata. Seharusnya hemat biaya untuk menanyakan
sesuatu .ContentType="text/vnd.wap.wml" %>
<?xml versi="1.0" pengkodean="gb2312"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.3//EN" " http://www.wapforum.org/DTD/wml13.dtd " >
<wml>
<card id="SJ" title="Permintaan lokasi nomor ponsel">
<%
'Koneksi basis data
redupkan koneksi1,sambungan1
const DB="xxx.mdb" 'Jalur perpustakaan ponsel
connstr1="DBQ="+server.mappath(""&DB&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
setel conn1=server.createobject("ADODB.CONNECTION")
conn1.open connstr1
'Filter karakter ilegal
fungsi chk(str)
jika str<>"" maka
chktopic=ganti(str,"'","''")
berakhir jika
fungsi akhir
%>
<%
'Pertanyaan seluler
jika request.form("SJ")<>"" lalu
d= chk(permintaan.form("SJ"))
'Tentukan apakah itu angka atau angka yang lebih besar dari 7 digit
jika len(d)>=7 dan IsNumeric(d) maka
c=kiri(d,7)
'Banyak kode yang dihilangkan di sini
sql="pilih * dari mod di mana start<="&c&" dan end>="&c&" dan mid(start,3,1)="&mid(c,3,1)&" dan mid(end,3,1 )="&pertengahan(c,3,1)&" dan pertengahan(mulai,4,1)="&pertengahan(c,4,1)&" dan pertengahan(akhir,4,1)="&pertengahan(c,4 ,1)&" dan pertengahan(mulai,5,1)="&pertengahan(c,5,1)&" dan pertengahan(akhir,5,1)="&pertengahan(c,5,1)&" dan pertengahan( mulai,6,1)="&pertengahan(c,6,1)&" dan pertengahan(akhir,6,1)="&pertengahan(c,6,1)&" "
atur rs=conn1.execute(sql)
jika bukan rs.eof maka
a=rs("kota")
b=rs("kota1")
e=rs("url")
f=rs("terima")
atur rs=tidak ada
kalau tidak
a="Maaf, catatan nomor ini tidak ditemukan"
berakhir jika
kalau tidak
a="Kesalahan: Pastikan Anda memasukkan angka lebih dari 7 digit!"
berakhir jika
%>
<b>Nomor ponsel yang Anda cari:</b><br/>
<%=d%><br/>
<b>Alamat:</b><%=a%> <%=b%><br/>
<b>Kode area dan deskripsi:</b><br/>
<%=e%> <%=f%>
<br/><br/>
<%end if%>
Silakan masukkan nomor ponsel Anda
<masukan ukuran = "8" nama = "SJ" type = "teks" maxlength = "11" />
<anchor title="Oke">Oke
<go href="index.asp" metode="posting">
<nama bidang pos="SJ" value="$SJ"/>
</pergi>
</jangkar>
<p align="center"><b>Hikey.NET</b></p>
</kartu>
</wml>
<%
setel koneksi1=tidak ada
%>