Ciao,

Su internet avevo trovato questo script x creare una sitemap dinamica da una pagina asp prelevando i dati da un db access

codice:
<%
' sitemap_gen_db.asp
' A simple script (using database) to automatically produce sitemaps for a webserver, in the Google Sitemap Protocol (GSP)
' by Francesco Passantino
' www.iteam5.net/francesco/sitemap_gen
' v0.1b released 5 june 2005
' v0.2  released 17 june 2005 iso8601dates http://www.tumanov.com/projects/scriptlets/iso8601dates.asp
' v0.2b released 28 july 2005 id_page=Server.URLEncode(rs("id")) to put words in id, thanks to Mike Kellogg
'
' BSD 2.0 license,
' http://www.opensource.org/licenses/bsd-license.php

MAXURLS_PER_SITEMAP = 50000

'modify this to change website, baseurl and table
baseurl="http://www.miosito.com/default.asp?page=xxx&id="

xDb_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db\yourdb.mdb") & ";"
strsql = "SELECT * FROM miatbella"

'see http://www.time.gov/ for utcOffset
utcOffset=1

response.ContentType = "text/xml"
response.write "<?xml version='1.0' encoding='UTF-8'?>"
response.write "<!-- generator='http://www.iteam5.net/francesco/sitemap_gen'-->"
response.write "<urlset xmlns='http://www.google.com/schemas/sitemap/0.84'>"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn
Do while not rs.eof
	if URLS<MAXURLS_PER_SITEMAP then

				'modify this to change database field
		id_page=Server.URLEncode(rs("id"))
		id_titolo=Server.URLEncode(rs("descrizione"))
		filelmdate=rs("data")

		if not isdate(filelmdate) then filelmdate=now()
		filedate=iso8601date(filelmdate,utcOffset)

		response.write "<url><loc>"&server.htmlencode(baseurl&id_page&"&tit="&id_titolo)&"</loc><lastmod>"&filedate&"</lastmod></url>"

response.write "<loc>" & server.htmlencode(baseurl & id_page & "&qtit=" & id_citta & id_titolo) & "</loc>"
		URLS=URLS+1
		Response.Flush
	rs.movenext
end if
Loop

response.write "</urlset>"

rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing


Function iso8601date(dLocal,utcOffset)	
	Dim d
	' convert local time into UTC
	d = DateAdd("H",-1 * utcOffset,dLocal)

	' compose the date
	iso8601date = Year(d) & "-" & Right("0" & Month(d),2) & "-" & Right("0" & Day(d),2) & "T" & _
		Right("0" & Hour(d),2) & ":" & Right("0" & Minute(d),2) & ":" & Right("0" & Second(d),2) & "Z"
End Function
%>
alla variabile baseurl preimpostata viene aggiunto dal db l'ID e descrizione per cui ad esempio avrei:

codice:
http://www.miosito.com/default.asp?page=xxx&id=123&tit=prova descrizione link
Con questo link google non dà errore ma non indicizza nulla in uanto mi dice ad esempio: 50 Url inviati 0 indicizzati.

se invece la url la compongo così:

codice:
http://www.miosito.com/default.asp?page=xxx&id=123
In questo caso google la indicizza.

Perché???? La descrizione la devo mettere altrimenti cosa indicizzerà???

Help????