Converter ASP para ASPX
03/05/2008
0
Grupo V.S boa tarde !
Vcs tem como me ajudar a converter essa programação para ASPX, eu quero colocar isso no meu projeto do Visual Studio 5. Essa programação esta como ASP
Essea programação passa email automatico quando o usuário clica em um botão.
<¬@ Page Language=´VB´ ClientTarget=´downlevel´ ¬>
<¬@ Import Namespace=´System.Web.Mail´ ¬>
<script language=´VB´ runat=´server´>
Sub btnSendMail_OnClick(Source As Object, E As EventArgs)
Dim myMessage As New MailMessage
Dim myMail As SmtpMail
Dim strEmail As String
If Page.IsValid() Then
strEmail = txtEmail.Text
myMessage.From = ´helpdesk@infolink.com.br´
myMessage.To = strEmail
myMessage.Subject = ´Exemplo de E-mail´
myMessage.Body = ´Mensagem enviada através do site ´ & Request.ServerVariables(´SERVER_NAME´) & ´.´ & vbCrLf & vbCrLf & ´E-mail de destino: ´ & strEmail & ´.´
myMail.SmtpServer = ´smtp.infolink.com.br´
myMail.Send(myMessage)
frmEmail.Visible = False
lblUserMessage.Text = ´Sua mensagem foi enviada para ´ & strEmail & ´.´
End If
End Sub
</script>
<html>
<head>
<title>ASP+Email Sample</title>
</head>
<body>
<asp:Label id=´lblUserMessage´ text=´Informe seu endereço de e-mail:´ runat=´server´ />
<asp:TextBox id=´txtEmail´ size=´30´ runat=´server´ />
<asp:RequiredFieldValidator runat=´server´
id=´validEmailRequired´ ControlToValidate=´txtEmail´
errormessage=´Please enter an email address.´
display=´Dynamic´ />
<asp:RegularExpressionValidator runat=´server´
id=´validEmailRegExp´ ControlToValidate=´txtEmail´
ValidationExpression=´^[\w-]+@[\w-]+\.(com|net|org|edu|mil|com.br)$´
errormessage=´Please enter a valid email address.´
Display=´Dynamic´ />
<asp:Button id=´btnSendMail´ text=´Enviar Email´ OnClick=´btnSendMail_OnClick´ runat=´server´ />
</body>
</html>
Por favor alguem pode me ajudar.
Vcs tem como me ajudar a converter essa programação para ASPX, eu quero colocar isso no meu projeto do Visual Studio 5. Essa programação esta como ASP
Essea programação passa email automatico quando o usuário clica em um botão.
<¬@ Page Language=´VB´ ClientTarget=´downlevel´ ¬>
<¬@ Import Namespace=´System.Web.Mail´ ¬>
<script language=´VB´ runat=´server´>
Sub btnSendMail_OnClick(Source As Object, E As EventArgs)
Dim myMessage As New MailMessage
Dim myMail As SmtpMail
Dim strEmail As String
If Page.IsValid() Then
strEmail = txtEmail.Text
myMessage.From = ´helpdesk@infolink.com.br´
myMessage.To = strEmail
myMessage.Subject = ´Exemplo de E-mail´
myMessage.Body = ´Mensagem enviada através do site ´ & Request.ServerVariables(´SERVER_NAME´) & ´.´ & vbCrLf & vbCrLf & ´E-mail de destino: ´ & strEmail & ´.´
myMail.SmtpServer = ´smtp.infolink.com.br´
myMail.Send(myMessage)
frmEmail.Visible = False
lblUserMessage.Text = ´Sua mensagem foi enviada para ´ & strEmail & ´.´
End If
End Sub
</script>
<html>
<head>
<title>ASP+Email Sample</title>
</head>
<body>
<asp:Label id=´lblUserMessage´ text=´Informe seu endereço de e-mail:´ runat=´server´ />
<asp:TextBox id=´txtEmail´ size=´30´ runat=´server´ />
<asp:RequiredFieldValidator runat=´server´
id=´validEmailRequired´ ControlToValidate=´txtEmail´
errormessage=´Please enter an email address.´
display=´Dynamic´ />
<asp:RegularExpressionValidator runat=´server´
id=´validEmailRegExp´ ControlToValidate=´txtEmail´
ValidationExpression=´^[\w-]+@[\w-]+\.(com|net|org|edu|mil|com.br)$´
errormessage=´Please enter a valid email address.´
Display=´Dynamic´ />
<asp:Button id=´btnSendMail´ text=´Enviar Email´ OnClick=´btnSendMail_OnClick´ runat=´server´ />
</body>
</html>
Por favor alguem pode me ajudar.
Fabriciosilvavale
Curtir tópico
+ 0
Responder
Posts
09/07/2008
Pcfviana
que estranho hem. pelo que vejo já esta em ´aspx´. depois mando as batatas fritas.
Responder
09/07/2008
Pcfviana
que estranho hem. pelo que vejo já esta em ´aspx´. depois mando as batatas fritas.
Responder
Clique aqui para fazer login e interagir na Comunidade :)
