Beberapa waktu yang lalu, ada halaman ASP yang sangat lambat dijalankan, pengunjungnya banyak, dan tidak sering diubah. Saya terlalu malas untuk menjadikannya statis secara langsung, saya harus mendownloadnya dari server setiap saat untuk mengubahnya itu, jadi saya harus mencari cara untuk mengubah halaman ASP menjadi halaman HTM. . .
Saya pernah melihat artikel seperti ini sebelumnya, tetapi saya tidak terlalu memperhatikannya. Sulit menemukan artikel yang cocok ketika saya benar-benar ingin menggunakannya, jadi saya lama mencari di Internet dan akhirnya menemukan yang lebih cocok. kode dan menambahkan modifikasi saya sendiri, sebagai berikut:
<%
Fungsi DapatkanPage(url)
'Dapatkan konten file
Pengambilan redup
Setel Pengambilan = CreateObject("Microsoft.XMLHTTP")
Dengan Pengambilan
.Buka "Dapatkan", url, False', "", ""
.Mengirim
GetPage = BytesToBstr(.ResponseBody)
Akhiri Dengan
Atur Pengambilan = Tidak Ada
Fungsi Akhir
Fungsi BytesToBstr(body)
objek redup
setel objstream = Server.CreateObject("adodb.stream")
objstream.Jenis = 1
objstream.Mode =3
objstream.Buka
objstream.Tulis isi
objstream.Posisi = 0
objstream.Jenis = 2
objstream.Charset = "GB2312"
BytesToBstr = objstream.ReadText
objstream.Tutup
setel objstream = tidak ada
Akhiri Fungsi
jika terjadi kesalahan dilanjutkan berikutnya
Url=" http://www.sina.com.cn"' Alamat halaman yang akan dibaca
respon.tulis "Mulai perbarui halaman beranda..."
wstr = DapatkanPage(Url)
'response.write(wstr)
Setel fs=Server.CreateObject("Scripting.FileSystemObject")
'jika bukan MyFile.FolderExists(server.MapPath("/html/")) maka
'File Saya.CreateFolder(server.MapPath("/html/"))'
'end if
' Alamat halaman yang akan disimpan
dizhi=server.MapPath("index.htm")
Jika (fs.FileExists(dizhi)) Lalu
fs.DeleteFile(dizhi)
Berakhir Jika
Set CrFi=fs.CreateTextFile(dizhi)
Crfi.Writeline(wstr)
setCrFi=tidak ada
atur fs=tidak ada
respon.tulis "...<font color=red>Pembaruan selesai!</font>"
%>
Kodenya paling sederhana, bisa langsung disimpan ke file asp, cukup atur URL (alamat asp yang akan dikonversi) dan dizhi (alamat html yang akan disimpan). Hanya dengan begitu kami dapat memastikan bahwa gambar, css, dan js berfungsi.
Semoga bermanfaat bagi sobat yang sedang mencari asp->htm.