Autore Topic: RegExp per convalidare le email  (Letto 120 volte)

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.764
  • Ne mors quidem nos iunget
    • Mostra profilo
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »

Offline Gianluigi

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 4.222
  • Tonno verde
    • Mostra profilo
Re:RegExp per convalidare le email
« Risposta #1 il: 17 Aprile 2022, 23:05:35 »
Come gli è stato indicato da gambafeliz (wiki) deve raddoppiare gli backslash
Codice: [Seleziona]
Public Sub Main()

  Dim sPath As String = "giuggiolino@gmail.com"
  Dim sExp As String = "(?i)\\b[a-z0-9._%\\-]+@[a-z0-9._%\\-]+\\.[A-Z]{2,4}\\b"
 
  If Not RegExp.Match(sPath, sExp) Then
    Print "sPath is NOT a correct e-mail address"
  Else
    Print "sPath is a correct e-mail address"
  Endif

End

P.S. Scusatemi, avevo aggiunto un'altra espressione che non era corretta e l'ho tolta
« Ultima modifica: 18 Aprile 2022, 10:05:49 da Gianluigi »
nuoto in attesa del bacio di una principessa che mi trasformi in un gambero azzurro