Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

watequate

O q esta de errado ?

Por , em ASP Clássico

Recommended Posts

watequate    0

watequate
Postado

Baixei esse codigo e mais alguns para fazer um newsletter, mas quando abro essa página aparece a seguinte mensagem:O nome da página é admin.xslA página XML não pode ser exibida Não é possível exibir a entrada XML usando a folha de estilos XSL. Corrija o erro e clique no botão Atualizar ou tente novamente mais tarde. --------------------------------------------------------------------------------A marca de fim' body' não coincide com a marca de início 'br'. Erro ao processar o recurso 'file:///D:/WebDesigner/Dicas/AS...</table></center></body></html>-------------------^O q esta de errado nesse codigo ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

watequate    0

watequate
Postado

Estranho!!!!!!!

 

Posta o codigo ai!!!!!!

<{POST_SNAPBACK}>

é o seguinte, baixei um tutorial no superasp com varios scripts prontos pra 1 newsletter, voi colar exatamente como esta pra você ver c tem algum erro, pq nao estou conseguindo enviar os emails. Esse tutorial usa Cdonts e o meu servdor eh Terra q aceita asp.

 

Passo1.

Criando o documento XML que conterá os emails e nomes das pessoas

 

(cadastro.xml)

 

<?xml version="1.0" encoding="ISO-8859-1"?>

<cadastro>

<usuario>

<nome>Teste</nome>

<email>teste@</email>

</usuario>

<usuario>

<nome>Teste2</nome>

<email>teste2@</email>

</usuario>

</cadastro>

 

 

 

Passo2.

Criando os documentos responsáveis por inserir novos cadastrados na lista

 

 

 

(form_cadastro.html)

 

<html><body bgcolor="white">

<form action="cadastrar.asp" method="post">

<b>Seu nome:</b><input type="text" name="nome"><br>

<b>Seu e-mail:</b><input type="text" name="email"><br>

<input type="submit" value="Cadastrar">

</form>

</body></html>

 

 

 

 

 

 

(cadastrar.asp)

 

<%@Language=VBScript%>

<html><body>

<%

nome=request.form("nome")

email=request.form("email")

set doc=server.createobject("microsoft.xmldom")

doc.load(server.mappath("cadastro.xml"))

set raiz=doc.documentElement

set registro=doc.createelement("usuario")

raiz.appendchild(registro)

set campo=doc.createelement("nome")

campo.text=nome

registro.appendchild(campo)

set campo=doc.createelement("email")

campo.text=email

registro.appendchild(campo)

doc.save(server.mappath("cadastro.xml"))

response.write"Cadastro realizado com sucesso!"

%><br>

<a href="admin.asp">Clique aqui para voltar à administracao</a>

</body></html>

 

 

 

Passo3.

Mostrando os cadastrados, apagando cadastrado e link para enviar os e-mails

 

 

 

(admin.xsl)

 

<?xml version="1.0" encoding="ISO-8859-1"?>

<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl"

xmlns="http://www.w3.org/TR/REC-html40">

<xsl:template match="/">

<html><body>

<a href="email_escrever.html">Escrever e-mail para cadastrados</a><br>

<center>

<table border="1">

<tr>

<td><b>Nome</b></td>

<td><b>E-Mail</b></td>

<td><b>Apagar</b></td>

</tr>

<xsl:for-each select="cadastro/usuario">

<tr>

<td><xsl:value-of select="nome"/></td>

<td><xsl:value-of select="email"/></td>

<td><a><xsl:attribute name="href">apagar.asp?email=<xsl:value-of select="email"/></xsl:attribute>Apagar</a></td>

</tr>

</xsl:for-each>

</table></center></body></html>

</xsl:template>

</xsl:stylesheet>

 

 

 

(admin.asp)

 

<%@Language=VBScript%>

<%

set xsldoc=server.createobject("microsoft.xmldom")

set xmldoc=server.createobject("microsoft.xmldom")

xmldoc.load(server.mappath("cadastro.xml"))

xsldoc.load(server.maptah("admin.xsl"))

response.write(xmldoc.transformnode(xsldoc))

%>

 

 

 

 

(apagar.asp)

 

<%@Language=VBScript%>

<%response.buffer="true"%>

<%

set xmldoc=server.createobject("microsoft.xmldom")

xmldoc.load(server.mappath("cadastro.xml"))

set raiz=xmldoc.documentElement

set registro=raiz.selectsinglenode("usuario")

raiz.removechild(registro)

xmldoc.save(server.mappath("cadastro.xml"))

response.redirect"admin.asp"

%>

 

 

 

 

Passo4.

Já estamos chegando ao final, basta criar o forumlário de envio de e-mail e o arquivo que envia os e-mails

 

(email_escrever.html)

 

<html><body bgcolor="white">

<form action="email_enviar.asp">

<b>Mensagem da newsletter:</b><br>

<textarea name="texto" rows="6" cols="35">

</textarea><br>

<input type="submit" value="Enviar">

</form></body></html>

 

 

 

 

(email_enviar.asp)

 

<%@Language=VBScript%>

<%

set rs=server.createobject("adodb.recordset")

rs.open(server.mappath("cadastro.xml"))

do until rs.eof

email=rs("email")

rs.movenext

loop

rs.close

set rs=nothing

texto=request.form("texto")

set mail=server.createobject("CDONTS.NewMail")

mail.To=email

mail.From="seuemail@servidor.com.br"

mail.Subject="Assunto"

mail.Body=texto

mail.Send

set mail=nothing

response.write"E-Mail enviado com sucesso!"

%>

<html><body bgcolor="white">

<a href="admin.asp">Voltar à administracao</a>

</body></html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

explore    3

explore
Postado

cara ele acusa no erro da tag <center>!!!!!!tenta colocar um div align=center!!!no caso do XSL não vi erro ali!!!!!!!!!!Falo!!!!!!!!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

watequate    0

watequate
Postado

cara ele acusa no erro da tag <center>!!!!!!

 

tenta colocar um div align=center!!!

 

no caso do XSL não vi erro ali!!!!!!!!!!

 

 

Falo!!!!!!!!!!

<{POST_SNAPBACK}>

Mas colocar esse div align center em qual deles ?

 

você conhece algum tutorial mais facil de fazer newsletter ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

explore    3

explore
Postado

cara ele acusa no erro da tag <center>!!!!!!

 

tenta colocar um div align=center!!!

 

no caso do XSL não vi erro ali!!!!!!!!!!

 

 

Falo!!!!!!!!!!

<{POST_SNAPBACK}>

Mas colocar esse div align center em qual deles ?

 

você conhece algum tutorial mais facil de fazer newsletter ?

<{POST_SNAPBACK}>

------------------------------------------------------------------------------------

ia ficar assim:

 

<?xml version="1.0" encoding="ISO-8859-1"?><xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl"xmlns="http://www.w3.org/TR/REC-html40"><xsl:template match="/"><html><body><a href="email_escrever.html">Escrever e-mail para cadastrados</a><br><div align="center"><table border="1"><tr><td><b>Nome</b></td><td><b>E-Mail</b></td><td><b>Apagar</b></td></tr><xsl:for-each select="cadastro/usuario"><tr><td><xsl:value-of select="nome"/></td><td><xsl:value-of select="email"/></td><td><a><xsl:attribute name="href">apagar.asp?email=<xsl:value-of select="email"/></xsl:attribute>Apagar</a></td></tr></xsl:for-each></table></div></body></html></xsl:template></xsl:stylesheet>
No caso do tutorial de newsletter tem bastante site sim tipo:

www.mxstudio.com.br

www.scriptbrasil.com.br

www.imasters.com.br

www.wmonline.com.br

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito