Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

ASP email validacija

[es] :: .NET :: ASP.NET :: ASP email validacija

[ Pregleda: 2650 | Odgovora: 18 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon ASP email validacija14.02.2011. u 13:19 - pre 159 meseci
<%
'
if ((LEN(Eposta)>5) OR (Vpr<>"")) then
if ((LEN(Eposta)>5) AND (Vpr<>"")) then



buf = "pitanje: " & Vpr

set mail = server.CreateObject("CDONTS.NewMail")
mail.From = "[email protected]"
mail.To = "[email protected]"
'mail.CC = "[email protected]"
'mail.BCC = "[email protected]"
mail.Subject = "FAQ"
mail.Body = buf
mail.Send

Set mail=nothing
%>

To je kod, ali ne umem da ga prepravim tako da ne moze da se posalje email ako ne sadrzi @ u njemu, nesto kao validacija email adrese, ili jos bolje kako ovo implementirati ovde a da radi:

function isEmail(string) {
if (string.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1)
return true;
else
return false;
}
 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija14.02.2011. u 14:12 - pre 159 meseci
regex za email:

patternEmailStrict = @"^(([^<>()[\]\\.,;:\s@\""]+"
+ @"(\.[^<>()[\]\\.,;:\s@\""]+)*)|(\"".+\""))@"
+ @"((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}"
+ @"\.[0-9]{1,3}\])|(([a-zA-Z\-0-9]+\.)+"
+ @"[a-zA-Z]{2,}))$";
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija14.02.2011. u 14:42 - pre 159 meseci
Svi bi bilo lepo kada bih znao gde to da ubacim, u frontpage 2003 je otvoren asp dokument. Ja sam imao drugo resenje ali iz visualbasica, al kad iskopiram kod ne radi tj nestane.

To vidim u vb-u a u fp-u ne vidim.
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript" Type="text/javascript"><!--
function FrontPage_Form1_Validator(theForm)
{

if (theForm.email.value == "")
{
alert("Please enter a value for the \"email\" field.");
theForm.email.focus();
return (false);
}

if (theForm.email.value.length < 6)
{
alert("Please enter at least 6 characters in the \"email\" field.");
theForm.email.focus();
return (false);
}

if (theForm.email.value.length > 50)
{
alert("Please enter at most 50 characters in the \"email\" field.");
theForm.email.focus();
return (false);
}
if (form.email.value.indexOf("@") == -1 ||
form.email.value.indexOf(".") == -1) {
fixElement(form.email, "Please include a proper email address.");
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan -->


Valjalo bi ako moze pomoc oko onog gore koda, kako da ga postavim?

A da, fajl je snimnjen kao *.asp
 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija14.02.2011. u 15:00 - pre 159 meseci
Sta je u pitanju validacija u javascript-u, asp.net-u ili asp(vbscript)
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija14.02.2011. u 15:19 - pre 159 meseci
Pojma nemam, onaj gore kod koji sam postavio je vezan za tu formu, sad nije moguce poslati email ako nije upisan emai i poruka, ali email moze biti bilo sta recimo 6 slova, hocu da napravim da email ne moze da bude napisan bez @, znaci mora da sadrzi @ kako bi email krenuo sa sajta meni na meil. I recimo da izbaci da nije lepo upisan email.

U fp sam naso neki propertis polja, pa validaciju ali nema na neki znak, ogranicio sam na min 6 karaktera i max 50, al i dalje nisam naso gde da postavim da ne moze bez @.

 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija14.02.2011. u 15:31 - pre 159 meseci
Probaj onda u asp/vbscrpt-u(to ti je najverovatniji scenario) da dodas ovu(dole) funkciju, na vrhu imas test, pa se poigraj malo..

Code:
<%
Response.write isValidEmail("[email protected]") & "<BR>"
Response.write isValidEmail("peraetperacom")

Function isValidEmail(myEmail)
  dim isValidE
  dim regEx
  
  isValidE = True
  set regEx = New RegExp
  
  regEx.IgnoreCase = False
  
  regEx.Pattern = "^[a-zA-Z][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$"

  ili

  regEx.Pattern ="^(([^<>()[\]\\.,;:\s@\""]+(\.[^<>()[\]\\.,;:\s@\""]+)*)|(\"".+\""))@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\])|(([a-zA-Z\-0-9]+\.)+[a-zA-Z]{2,}))$"; "
  
  isValidE = regEx.Test(myEmail)
  
  isValidEmail = isValidE
End Function%>
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija14.02.2011. u 19:33 - pre 159 meseci
nisam jos uvek nista uradio, koliko se razumem u ovo ovaj deo koda
Code:
if ((LEN(Eposta)>5) OR (Vpr<>"")) then
if ((LEN(Eposta)>5) AND (Vpr<>"")) then


treba da ukine pokusaj slanja prazne poruke, ja dodam ovo

InStr(Eposta,"@")=0 THEN

a mozda nije lepo napisano, pa ne radi.

eposata je email adresa
vpr mi je text koji se unos u drugo polje ili poruka

[Ovu poruku je menjao djgorandj dana 14.02.2011. u 20:45 GMT+1]
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 12:26 - pre 159 meseci
Imal sta od predloga?
if ((LEN(Eposta)>5) jel mogu to da prepravim da gleda dal ima @ u polju ili ne?
probao sam java script i nece
onaj iznad predlozen kod nece da radi jel ga pusti vec napisan kod pa email i pored zabrane ode.
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 12:27 - pre 159 meseci
<script>
function ValidateForm1()
{
var email = document.Form1.Eposta;

if (email.value.indexOf("@", 0) < 0)
{
window.alert("Please enter a valid e-mail address.");
email.focus();
return false;
}
return true;

}
</script>

ni to nije htelo da radi
 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija15.02.2011. u 13:04 - pre 159 meseci
Nije me mrzelo, pa sam probao i rade oba patterna, evo ti komplet asp (otvori posebnu asp stranicu i kopiraj kod i otvori je u browseru)..
rezultat ce ti biti :
True
False

Code:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
</head>

<body>
<%
Response.write isValidEmail("[email protected]") & "<BR>"
Response.write isValidEmail("peraetperacom")

Function isValidEmail(myEmail)
  dim isValidE
  dim regEx
  
  isValidE = True
  set regEx = New RegExp
  
  regEx.IgnoreCase = False
  
'  regEx.Pattern = "^[a-zA-Z][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$"



  regEx.Pattern ="^(([^<>()[\]\\.,;:\s@\""]+(\.[^<>()[\]\\.,;:\s@\""]+)*)|(\"".+\""))@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\])|(([a-zA-Z\-0-9]+\.)+[a-zA-Z]{2,}))$"
  
  isValidE = regEx.Test(myEmail)
  
  isValidEmail = isValidE
End Function%>
</body>
</html>


Ovu funkciju isValidEmail primeni kao uslov za slanje email-a..
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 13:25 - pre 159 meseci
Pa verovatno radi. Al ja to ne umem da ubacim da radi kod mene. Isto ko i da ne radi.

Kad ubacim iznad postojeceg koda samo se dopise true, false. Al i dalje ode email bez @
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 13:37 - pre 159 meseci
Code:


<html>
<head>
<title>d.o.o.</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
<link href="../stil.css" rel="stylesheet" type="text/css">
</head>
<body >

<%
ON ERROR RESUME Next
Jezik=request.QueryString("lang")
Isci=request.Form("isci")
Eposata=request.Form("email")
Vpr=request.Form("pitanje")

' imebaze="../Db/baza.mdb"
imebaze="../db/baza.mdb"
set conntemp=server.createobject("adodb.connection")
' conntemp.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath(imebaze)
conntemp.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(imebaze) & ";Persist Security Info=False"

%>
<p class="Naslov">Pitanja</p>
<table width="656" border="0">
  <tr>
    <td>&nbsp;</td>
    <td>
      <form name="Form1" method="post" action="faq.asp?lang=<%=Jezik%>" onsubmit="return ValidateForm1();" language="JavaScript">
        <table width="100%" border="0" cellpadding="0" cellspacing="0" background="../slike/back1.jpg">
    

<%

 
if ((LEN(Eposata)>5) OR  (Vpr<>"")) then
if ((LEN(Eposata)>5) AND  (Vpr<>"")) then



  buf = "Pitanje: " & Vpr
  
  set mail = server.CreateObject("CDONTS.NewMail")
  mail.From = "[email protected]"
  mail.To = "[email protected]"
  'mail.CC = "[email protected]"
  'mail.BCC = "[email protected]"
  mail.Subject = "FAQ"
  mail.Body = buf
  mail.Send

  Set mail=nothing
  %>
          <tr>
            <td colspan="2" valign="top" background="../slike/back1.jpg"><p><b>Slanje je uspelo.</b><br>
                <br>
                &nbsp;</p>
            </td>
          </tr>
  <%
else 
  %>
          <tr>
            <td colspan="2" valign="top" background="../slike/back1.jpg">
              <p><b>Pošiljanje NI uspelo!</b><br>Unesite sva posalja! <b>ne zaboravite uneti vas email</b><br>&nbsp;</p>
            </td>
          </tr>
  <%
  end if
end if
%>            
          <tr>
            <td valign="top" background="../slike/back1.jpg"><b>Vaš e-naslov:</b><br>
              &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            
              <input name="email" type="text" id="email" value="<%=Eposata%>" size="30" maxlength="50" >
              <br>
              <br>
              <input type="submit" name="Submit" value="Posalji">
            </td>
            <td valign="top"><b>Vaše pitanje:</b><br>
              <textarea name="pitanje" cols="30" rows="4" id="pitanje"><%=Vpr%></textarea>
            </td>
          </tr>
        </table>
      </form>
    </td>
  </tr>



to je kompletno, i nemam pojma gde sta da ubacim
 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija15.02.2011. u 14:14 - pre 159 meseci
Pod uslovom da gore tvoj kod nema jos nekih gresaka, probaj (ovako napamet) :

Code:
<html>
<head>
<title>d.o.o.</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
<link href="../stil.css" rel="stylesheet" type="text/css">
</head>
<body >

<%
ON ERROR RESUME Next
Jezik=request.QueryString("lang")
Isci=request.Form("isci")
Eposata=request.Form("email")
Vpr=request.Form("pitanje")

' imebaze="../Db/baza.mdb"
imebaze="../db/baza.mdb"
set conntemp=server.createobject("adodb.connection")
' conntemp.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath(imebaze)
conntemp.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(imebaze) & ";Persist Security Info=False"

%>
<p class="Naslov">Pitanja</p>
<table width="656" border="0">
  <tr>
    <td>&nbsp;</td>
    <td>
      <form name="Form1" method="post" action="faq.asp?lang=<%=Jezik%>" onsubmit="return ValidateForm1();" language="JavaScript">
        <table width="100%" border="0" cellpadding="0" cellspacing="0" background="../slike/back1.jpg">
    
<%
Function isValidEmail(myEmail)
  dim isValidE
  dim regEx
  
  isValidE = True
  set regEx = New RegExp
  
  regEx.IgnoreCase = False
  
'  regEx.Pattern = "^[a-zA-Z][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$"



  regEx.Pattern ="^(([^<>()[\]\\.,;:\s@\""]+(\.[^<>()[\]\\.,;:\s@\""]+)*)|(\"".+\""))@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\])|(([a-zA-Z\-0-9]+\.)+[a-zA-Z]{2,}))$"
  
  isValidE = regEx.Test(myEmail)
  
  isValidEmail = isValidE
End Function %>

<%

 
if (isValidEmail(Eposata)) then



  buf = "Pitanje: " & Vpr
  
  set mail = server.CreateObject("CDONTS.NewMail")
  mail.From = "[email protected]"
  mail.To = "[email protected]"
  'mail.CC = "[email protected]"
  'mail.BCC = "[email protected]"
  mail.Subject = "FAQ"
  mail.Body = buf
  mail.Send

  Set mail=nothing
  %>
          <tr>
            <td colspan="2" valign="top" background="../slike/back1.jpg"><p><b>Slanje je uspelo.</b><br>
                <br>
                &nbsp;</p>
            </td>
          </tr>
  <%
else 
  %>
          <tr>
            <td colspan="2" valign="top" background="../slike/back1.jpg">
              <p><b>Pošiljanje NI uspelo!</b><br>Unesite sva posalja! <b>ne zaboravite uneti vas email</b><br>&nbsp;</p>
            </td>
          </tr>
  <%
  end if
end if
%>            
          <tr>
            <td valign="top" background="../slike/back1.jpg"><b>Vaš e-naslov:</b><br>
              &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            
              <input name="email" type="text" id="email" value="<%=Eposata%>" size="30" maxlength="50" >
              <br>
              <br>
              <input type="submit" name="Submit" value="Posalji">
            </td>
            <td valign="top"><b>Vaše pitanje:</b><br>
              <textarea name="pitanje" cols="30" rows="4" id="pitanje"><%=Vpr%></textarea>
            </td>
          </tr>
        </table>
      </form>
    </td>
  </tr>



NOTE: i ovo ti nije kompletna strana vec deo iste, posto nemas zatvorene body i html tagove, jeli tako..
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 14:25 - pre 159 meseci
ima dole iscitavanje iz baze pitanja, nebitna su za slanje emaila, ostalo nema nikakve veze sa ovim gore.

sad c da probam ovo.
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 14:35 - pre 159 meseci
if ((LEN(Eposata)>5) OR (Vpr<>"")) then
if ((LEN(Eposata)>5) AND (Vpr<>"")) then
bez ta dva reda ne radi

e onda sam stavio ova 2
if (isValidEmail(Eposata)) then
if (isValidEmail(Eposata)) then

pa sad radi ali ne salje email. ne izbacuje gresku u bilo kom obliku. Pre je izbacivalo recimo da jedno od ta dva nije popunjeno ili tako nesto. Sad samo refresuje i to je to
 
Odgovor na temu

dejanet
Beograd

Član broj: 19240
Poruke: 1181



+835 Profil

icon Re: ASP email validacija15.02.2011. u 14:44 - pre 159 meseci
..stavi jedan :
if (isValidEmail(Eposata)) then

skini dole jedan

end if
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 15:39 - pre 159 meseci
to je to, hvala
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija15.02.2011. u 18:11 - pre 159 meseci
Da ne otvaram novi topic, ako se neko razume u ovo
Code:
<!--webbot bot="SaveResults" startspan S-Email-Format="HTML/DL"
  B-Email-Label-Fields="TRUE" B-Email-ReplyTo-From-Field="TRUE"
  S-Email-ReplyTo="e_mail" B-Email-Subject-From-Field="FALSE"
  S-Email-Subject="Pitanje" S-Builtin-Fields="HTTP_USER_AGENT"
  S-Form-Fields="ime_primaoca ime_posiljaoca naslov telefon faks e_mail zanimanje "
  U-Confirmation-Url="uspesno_poslato.htm"
  S-Email-Address="[email protected]" -->

Ista fora ko i gore samo ovde drugaciji kod, imal sta da uradim oko emaila da mora da sadrzi @ u svom nekom delu, ne mora da prati kompletnu formu [email protected] recimo , dovoljno samo da ima @ i da pusti email?

Ili mozda neka validacija za polje to gde se unosi email, tamo u fp sam naso za duzinu, resimo od 3 do 50 karaktera, ali ne i da mora da sadrzi neki znak.?
 
Odgovor na temu

djgorandj
Goran Avramovic
Arandjelovac

Član broj: 103981
Poruke: 196
*.dynamic.isp.telekom.rs.

ICQ: 242041632
Sajt: www.rcavioni.com


+3 Profil

icon Re: ASP email validacija17.02.2011. u 14:08 - pre 159 meseci
Code:
 buf = "Vaše ime : " & ime & vbCrLf & "e-mail: " & Email 
  set mail = server.CreateObject("CDONTS.NewMail")
 
  mail.From = "[email protected]"
   mail.To = "[email protected]"
  
  mail.Subject = "pitanja"
  mail.Body = buf
  mail.Send

Ovo sam probao ali ne radi
Code:

 ' UTF-8 parameters
   mail.CharSet = "UTF-8"
   mail.ContentTransferEncoding = "Quoted-Printable"
   



Nikako da mi posalje sa nasim slovima, uvek neke karakuke. Imam html koji je utf-8 u njega upisujem polja i popunjavam emai formu a asp fajl preuzimai salje emai. To je ukratko, sve je na utf-8 ali ne ide.
ovaj deo ne hvata utf-8

buf = "Vaše ime : " & ime & vbCrLf & "e-mail: " & Email
 
Odgovor na temu

[es] :: .NET :: ASP.NET :: ASP email validacija

[ Pregleda: 2650 | Odgovora: 18 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.