// include the latest version of the regex crate in your Cargo.toml
extern crate regex;
use regex::Regex;
fn main() {
let regex = Regex::new(r#"(?m)(\(\"STRCONNEXION\"\)?.=?.*)\"(.*?)\""#).unwrap();
let string = "<SCRIPT LANGUAGE=\"VBScript\" RUNAT=Server>
'Session_OnStart S'ex�cute la premi�re fois qu'un utilisateur utilise une page de votre application
'Session_OnEnd S'ex�cute en cas de d�passement du d�lai de la session d'un utilisateur ou quand celui-ci quitte votre application
'Application_OnStart S'ex�cute une fois lorsque la premi�re page de votre application est utilis�e pour la premi�re fois par un utilisateur
'Application_OnEnd S'ex�cute une fois lors de l'arr�t du serveur Web
Sub Session_OnStart
'Session(\"STRCONNEXION\")=\"wowoowow\"
Session(\"STRCONNEXION\")=\"wowoowow\"
'Session(\"STRCONNEXION\")=\"wowoowow\"
Session.Timeout = 240
Session(\"Connected\") = 0 ' Utilisateur n'est pas encore authentifie
Session(\"langue\") = \"ita\"
'Set Session(\"SiteId\")
HostToSiteId
End Sub
Sub Session_OnEnd
Session.Abandon
end Sub
Sub Application_OnStart
Application(\"Titre\") = \"GVI\"
' Composants COM
Application(\"AccesBannieres.Banniere\") = \"AccesBannieresGVI.Banniere\"
Application(\"AccesBatch.Batch\") = \"AccesBatchGVI.Batch\"
Application(\"AccesCheck.Check\") = \"AccesCheckGVI.Check\"
Application(\"AccesCibles.Cibles\") = \"AccesCiblesGVI.Cibles\"
Application(\"AccesCibles.Produits\") = \"AccesCiblesGVI.Produits\"
Application(\"AccesCommande.Commande\") = \"AccesCommandeGVI.Commande\"
Application(\"AccesCommunication.Communication\") = \"ACGVI.Communication\"
Application(\"AccesDepotVente.GestionCommande\") = \"AccesDepotVenteGVI.GestionCommande\"
Application(\"AccesDepotVente.InfosVo\") = \"AccesDepotVenteGVI.InfosVo\"
Application(\"AccesDepotVente.Mails\") = \"AccesDepotVenteGVI.Mails\"
Application(\"AccesEncheres.Administrateur\") = \"AccesEncheresGVI.Administrateur\"
Application(\"AccesEncheres.Cloture\") = \"AccesEncheresGVI.Cloture\"
Application(\"AccesEncheres.ListeCriteres\") = \"AccesEncheresGVI.ListeCriteres\"
Application(\"AccesEncheres.Utilisateur\") = \"AccesEncheresGVI.Utilisateur\"
Application(\"AccesFicheVO.FicheVO\") = \"AccesFicheVOGVI.FicheVO\"
Application(\"AccesInscriptions.Inscriptions\") = \"AIGVI.Inscriptions\"
Application(\"AccesListeVO.AlerteEmail\") = \"AccesListeVOGVI.AlerteEmail\"
Application(\"AccesListeVO.ListeCriteres\") = \"AccesListeVOGVI.ListeCriteres\"
Application(\"AccesListeVO.ListeCriteresDV\") = \"AccesListeVOGVI.ListeCriteresDV\"
Application(\"AccesListeVO.ListeVO\") = \"AccesListeVOGVI.ListeVO\"
Application(\"AccesListeVO.ListeVODV\") = \"AccesListeVOGVI.ListeVODV\"
Application(\"AccesLogin.Login\") = \"AccesLoginGVI.Login\"
Application(\"AccesMix.Mix\") = \"AccesMixGVI.Mix\"
Application(\"AccesParameters.Parameters\") = \"AccesParametersGVI.Parameters\"
Application(\"AccesPrevente.Prevente\") = \"AccesPreventeGVI.Prevente\"
Application(\"AccesPromotions.Administration\") = \"AccesPromotionsGVI.Administration\"
Application(\"AccesPromotions.Promotions\") = \"AccesPromotionsGVI.Promotions\"
Application(\"AccesReport.Reports\") = \"AccesReportGVI.Reports\"
Application(\"AccesStopAffaire.Administrateur\") = \"ASAGVI.Administrateur\"
Application(\"AccesStopAffaire.ListeCriteres\") = \"ASAGVI.ListeCriteres\"
Application(\"AccesStopAffaire.StopAffaire\") = \"ASAGVI.StopAffaire\"
Application(\"AccesSuiviHisto.SuiviHisto\") = \"AccesSuiviHistoGVI.SuiviHisto\"
Application(\"AccesVenteParLot.Administrateur\") = \"AVPLGVI.Administrateur\"
Application(\"AccesVenteParLot.ListeCriteres\") = \"AVPLGVI.ListeCriteres\"
Application(\"AccesVenteParLot.VenteParLot\") = \"AVPLGVI.VenteParLot\"
Application(\"AccesVisibilite.Visibilite\") = \"AccesVisibiliteGVI.Visibilite\"
' Nombre de r�sultat par page dans la liste VO
Application(\"PageToResult\") = 20
End Sub
Sub HostToSiteId
Dim audiHost, vwHost, currentHost
audiHost = \"www.audi-lineos.it\"
vwHost = \"www.vgilineos.it\"
currentHost = Request.ServerVariables(\"HTTP_HOST\")
If currentHost = audiHost Then
Session(\"SiteId\") = 1
Session(\"SiteName\") = \"Audi\"
End If
If currentHost = vwHost Then
Session(\"SiteId\") = 2
Session(\"SiteName\") = \"VW\"
End If
If currentHost = \"localhost:8080\" Then
Session(\"SiteId\") = 2
Session(\"SiteName\") = \"VW\"
End If
End Sub
</SCRIPT>
";
// result will be an iterator over tuples containing the start and end indices for each match in the string
let result = regex.captures_iter(string);
for mat in result {
println!("{:?}", mat);
}
}
Please keep in mind that these code samples are automatically generated and are not guaranteed to work. If you find any syntax errors, feel free to submit a bug report. For a full regex reference for Rust, please visit: https://docs.rs/regex/latest/regex/