<%@ Language=VBScript %> <% Option Explicit %> <% Response.Expires=0 %> <% ' Include this file dim gb_text dim connection_string ' Setup connection connection_string="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database/gbdb.mdb") & ";" ' Setup guestbook parameters ' page numbers would be separated by this symbols ' you can insert images etc... gb_pageSeparator=" " gb_pageSeparatorLong=" ... " ' Head background gb_colorHead="4060A0" ' Message background gb_colorMessage="D0F0E8" ' Head font gb_fontHead="" ' Message font gb_fontText="" ' Font used in navigation etc... gb_fontTool="" ' Close font tag gb_fontEnd="" ' Collect guestbook output and process forms gb_text=gb_init(connection_string) %> PIADAS AFINIDADES.COM.BR______________________________________
EFEITO ESTUFA.... 

 

voltar