set
1
2009

Script em ASP – Google Sitemap Generator

Script em ASP para geração de sitemap em XML no formato do Google.

Script em ASP para geração de sitemap em XML no formato do Google.

Disponibilizamos aqui um script em ASP básico para a geração de um Sitemap no formato definido pelos padrões do projeto Sitemaps.Org. O script é fácil de utilizar, e se baseia no trabalho de Francesco Passantino, disponível em www.iteam5.net/francesco/sitemap_gen.

Abaixo, alguns comentários para a utilização do script:

1
session("server")="http://www.seusite.net/"

Acima, deve-se trocar a URL de exemplo pela URL do seu site.

1
session("priority")=1.00

Acima, definimos a prioridade padrão como 1.0, que será decrementada a cada diretório encontrado (Ex: /css, /images,/js, etc).

1
phisicalDir="C:\inetpub\wwwroot\seusite\"

Acima, devemos especificar o caminho físico para o diretório raíz do site, ou então usar a função Server.MapPath() do VBScript para retornar o diretório físico.

1
utcOffset=-3

Acima, definimos o Offset do Horário Universal (UTC) baseado na localização do servidor. Nesse caso, definimos como -3 (horário de Brasília).

1
2
3
4
5
6
7
8
9
10
11
Function Folderpermission(pathName)
'modify this to exclude path
PathExclusion=Array("\temp","\_vti_cnf","\_vti_pvt","\_vti_log","\cgi-bin","\_css","\_inc","\_js","\adm","\db","\blog","\aspnet_client","\sitemap")
Folderpermission =True
for each PathExcluded in PathExclusion
if instr(ucase(pathName),ucase(PathExcluded))>0 then
Folderpermission = False
exit for
end if
next
End Function

A função acima define quais diretórios não terão seus conteúdos listados. Por exemplo, podemos incluir diretórios de scripts (includes), javascripts, folhas de estilos, imagens, bancos de dados, etc.

1
2
'http://www.googleguide.com/file_type.html
Extensions = Array("png","gif","jpg","zip","pdf","ps","html","htm","asp","wk1","wk2","wk3","wk4","wk5","wki","wks","wku","lwp","mw","xls","ppt","doc","wks","wps","wdb","wri","rtf","ans")

No array acima (Extensions), definimos quais as extensões de arquivos serão permitidas na geração do XML Sitemap. No comentário temos o link do Google que estabelece quais extensões são aceitas no modelo de sitemap aceito pelos robôs desta empresa.

1
2
3
4
5
6
7
8
9
10
11
12
13
Function FileNameIsBad(sFileName)
if len(trim(sFileName)) = 0 then
FileNameIsBad = true
Exit Function
end if
Filename = Array("/alive.asp","/404.asp","/500.asp","/301.asp","/sitemap_gen.asp")
FileNameNumber = ubound(Filename)
for i=0 to FileNameNumber
if Filename(i) = sFileName then
FileNameIsBad = True
end if
next
End Function

Esta função acima verifica os nomes dos arquivos, descartando páginas de erro, scripts padrão do servidor IIS (ou PWS), etc. Também será descartado o próprio script de geração do sitemap (“sitemap_gen.asp”).

Bem, por hora isso é tudo. Clique na imagem abaixo para fazer o download do script compactado no padrão Zip.

DownloadGoogle XML Sitemap Generator em ASP

Posts relacionados

About the Author: Edu Nicácio

Analista de Sistemas com experiência em sistemas de médio e grande porte em empresas de Telecom, Seguros e Automobilística. Possui mais de sete anos de experiência em desenvolvimento de sistemas Web, cliente-servidor, multi-camadas e desktop, trabalhando com tecnologias como .Net (C#), Java, Delphi, ASP, JavaScript, XML, CSS, XHTML, SQL, Transact/SQL, PL/SQL, PG/SQL, MySQL, Unix/Linux e ShellScript. Quando não está estudando ou desenvolvendo alguma coisa nova, gosta de passar o tempo com a esposa e os amigos.

Deixe um comentário

Spam protection by WP Captcha-Free

Publicidade