tableless-2004/enviado.asp at master · tableless/tableless-2004 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
<%
	email = request.form("email")
	url = request.form("url")
	if email="" then email="automatico@tableless.com.br"
	Set objmail = Server.CreateObject("CDONTS.NewMail")
	objmail.from = email
	objmail.to = "diego@tableless.com.br"
	objmail.subject = "Sugestão de Site para Diretório Tableless"
	objmail.body = url
	objmail.send
	set objmail=nothing
%>	<!-- #include file="cab.asp" -->
	<%txtBlog=geraBlog()%>

	<!-- #include file="menu.asp" -->

	<!-- #include file="sites.asp" -->

 	<!-- #include file="buscador.asp" -->

		<!-- #include file="recomendado.asp" -->

<!-- #include file="arquivo.asp" -->
		<!-- #include file="franquia.asp" -->


	<div id="txtcont">
<h2>Enviado com sucesso!</h2>

			<p>
				Obrigado pela colaboração.<br />
				Vamos análisar o site e assim que possível, colocaremos o link indicado no diretório.
			</p>

	</div>

<!-- #include file="rodape.asp" -->