Teman yang telah membacanya dapat membantu Anda. Kode -kode ini diposting untuk pertama kalinya. Ada banyak dari mereka di luar, baik mereka sangat rumit dan tidak dapat dipahami atau tidak dapat digunakan. Saya telah berusaha sekadar ringkas dan sejelas mungkin saat menulis yang berikut.
Banyak kode pembuatan sitemap yang disebut hanya menghasilkan alamat file direktori dan tidak menghasilkan dinamika. Saya kemudian menulis ini sendiri, yang mendukung dinamika. Contoh:
Jika Anda adalah situs web artikel dan memiliki 2.000 artikel, maka Anda dapat memodifikasi tabel data artikel yang sesuai untuk menghasilkan 2.000 alamat dinamis di samping semua file direktori. Sama sekali tidak ada yang bisa dikatakan, dan kecepatan generasi sangat cepat.
Simpan kode berikut sebagai file sitemap.asp, memodifikasi beberapa tempat yang telah saya catat, jangan memodifikasi yang lain, dan hanya tahu apakah itu telah digunakan
Salin kode kode sebagai berikut: <!-#includeFile = "conn.asp"->
<%
sesi ("hitung") = 0
strurl = "http: //" & request.serverVariable ("server_name") & _
left (request.serverVariable ("script_name"), len (request.servervariable ("script_name"))-len ("/sitemap.asp")))
DIMFOOLCAT
foolcat = foolcat+"<? xmlversion =" "1.0" "encoding =" "UTF-8" "?>"
foolcat = foolcat+"<! --goOglesitemapFileGeneratedByHttp: //www.xxx.com" & return_rfc822_date (sekarang, "gmt") & "->"
foolcat = foolcat+"<urlsetxmlns =" "http://www.google.com/schemas/sitemap/0.84"> "
foolcat = foolcat+"<rerl>"
foolcat = foolcat+"<loc>" & strurl & "/</loc>"
foolcat = foolcat+"</ruRl>"
session ("count") = sesi ("count")+"1"
setall_fs = server.CreateObject ("Scripting.FilesyStemObject")
setall_folder = all_fs.getfolder (server.mappath ("/"))
setall_files = all_folder.files
foreachfileinall_files
foolcat = foolcat+"<rerl>"
foolcat = foolcat+"<loc>" & strurl & "/" & file.name & "</coc>"
foolcat = foolcat+"</ruRl>"
session ("count") = sesi ("count")+"1"
Berikutnya
DIMJS, SQL
setjs = server.createObject ("adodb.recordset")
sql = "pilih*dari [nama tabel untuk menghasilkan] orderbysidac" // ubah nama tabel data yang ingin Anda hasilkan
setjs = conn.execute (sql)
Dountiljs.eof
id = "" & js ("id") & "// Modifikasi ke bidang ID Anda
foolcat = foolcat+"<rerl>"
foolcat = foolcat+"<loc>" & strurl & "/xxx.asp? id =" & id & "</loc>" // modifikasi ke nama file dan id Anda