IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)

Kit : Améliorations de la gestion du code

Date de publication : 16/11/2006 , Date de mise à jour : 28/01/2006



4. Langages déjà supportés par l'ancien système de coloration
4-A. Action script
4-B. ASP , ASP.NET
4-C. Awk
4-D. Borland C++ , C , C++ , C#
4-E. CSS
4-F. Delphi et Delphi pour .NET
4-G. INI
4-H. Java
4-I. Javascript
4-J. Shell linux
4-K. Oracle
4-L. Autre
4-M. Perso
4-N. PHP
4-O. PostGreSQL
4-P. Python
4-Q. SQL
4-R. VB , VB.NET
4-S. XML


4. Langages déjà supportés par l'ancien système de coloration


4-A. Action script

ActionScript
on (release) { 
//gestion des propriétés de la popup
//  variable .variable
getURL("javascript:MM_openBrWindow('intro.html','nomfenetre','width=500, height=370,"
          "status=no,scrollbars=no,resizable=no,titlebar=no')");
Machin := variable +1  toto.variable;
}
function trim(s:String):String {
    var nEspace:Number = 32; // Code représentant l'espace
    var nBegin:Number = 0;
    var nEnd:Number = s.length;
    var c:Number = s.charCodeAt(nBegin) ;
    while (c == nEspace) {
        c = s.charCodeAt(++nBegin) ;
    }
    c = s.charCodeAt(nEnd-1); /* -1 car les index commencent à 0*/
    while (c == nEspace) {
        c = s.charCodeAt(--nEnd) ;
    }
    return s.substring(nBegin, nEnd+1); // +1 car le second paramètre est l'index du premier caractère /* test */ suivant la chaîne à extraire
}
var sAncienneChaine:String = "     Ceci est une chaîne avec des espaces inutiles au début et à la fin      ";
var sltChaine:String = trim(sAncienneChaine);
trace("-> \""+sltChaine+"\" <-");
trace("**/*****************************************/**");
/*
 *  Autre exemple 
 */
this.createEmptyMovieClip("triangle_mc", 10);
triangle_mc._x = triangle_mc._y = 100;
drawTriangle(triangle_mc, 100, 0x99FF00, 100);

function drawTriangle(target_mc:MovieClip, sideLength:Number, fillColor:Number, fillAlpha:Number):Void {
    var tHeight:Number = sideLength * Math.sqrt(3) / 2;
    with (target_mc) {
        beginFill(fillColor, fillAlpha);
        moveTo(sideLength / 2, 0);
        lineTo(sideLength, tHeight);
        lineTo(0, tHeight);
        lineTo(sideLength / 2, 0);
        endFill();
    }
}
/* // Fin */
trace(Stage.width + " " + triangle_mc._width);
// */

4-B. ASP , ASP.NET

asp
<%
' récupération du paramètre
idimage_get = Request.QueryString("idimage")

' création de la connexion à la base de données
Set conn = Server.CreateObject("ADODB.Connection")
' ouverture de la connexion
conn.Open chainedeconnexion ' chainedeconnexion est à préciser sui

' création de la requete
requete = "SELECT type_image, bin_image FROM images WHERE idimage=" & idimage_get

' exécution de la requête
Set rs = conn.Execute(requete)

' positionnement du content-type
Response.ContentType = rs("type_image")

' écriture du contenu du champ blob
Response.BinaryWrite(rs("bin_image"))

' fermeture et destruction de la connexion
conn.close
Set conn = Nothing
%>
aspnet
<asp:calendar id="Calendar1"  runat="server"
Width="47px" Height="40px">
   <TodayDayStyle Font-Names="Arial" Font-Bold="True" ForeColor="Red"></TodayDayStyle>
   <SelectorStyle Font-Names="Arial"></SelectorStyle>
   <%Truc muche sldgj%>
   <%-- UneLigne --%>
   <DayStyle Font-Names="Arial" ForeColor="#006600"></DayStyle>
   <DayHeaderStyle Font-Names="Arial" ForeColor="White" BorderColor="#006600" 
        BackColor="#006600"></DayHeaderStyle>
   <!-- The big boss -->
   <!-- The big 
   <OtherMonthDayStyle Font-Names="Arial" ForeColor="#006600" BorderColor="White" 
        BackColor="White"></OtherMonthDayStyle>
   boss -->
   <OtherMonthDayStyle Font-Names="Arial" ForeColor="#006600" BorderColor="White" 
        BackColor="White"></OtherMonthDayStyle>
   <%-- The big 
   <OtherMonthDayStyle Font-Names="Arial" ForeColor="#006600" BorderColor="White" 
        BackColor="White"></OtherMonthDayStyle>
   boss --%>
   <OtherMonthDayStyle Font-Names="Arial" ForeColor="#006600" BorderColor="White" 
        BackColor="White"></OtherMonthDayStyle>
</asp:calendar>

4-C. Awk

awk
#! /usr/bin/awk -f

BEGIN {
    FS="/"
}
{
    path=""
    for (i = 1; i < (NF); i++) {
       path = path $i "/"
    }
    print path
}

4-D. Borland C++ , C , C++ , C#

bcb
// qlksfj
#define ssdfs\ fsdf \
sdfsdf sdfsdf  sdfsdf \ sdfsdf 
fsdfsdf sdfsdf sdfsfd
// skfskjfhd
 #define sùfsmdf
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TButton *Button;
    Button = dynamic_cast <TButton *> (Sender);
    if (Button == Button1)
    ShowMessage("Butt\"on1");
    else
    if (Button == Button2)
    ShowMessage("Button2");
    else
    ShowMessage("C'est louche");
    Button->Caption = "Appuyé";
}
C
char c1, c2, c3, c4;
/* ..000001
sdfsdf
sdfs01 */

// skjfdhksjdhfks 

c1 = 5; /* ..00000101 */
c2 = 4; /* ..00000100 */
c3 = c1 <<2; /* 00000101(c1) -> 00010100(c3)*/

if (a==b) {
    x = 5; 
} else {
    x = 10; 
}
C++
/* ..000001
sdfsdf
sdfs01 */
// en début de ligne
#define c // Machin
// commentaire
#endif
#endif
 #endif
#endif
#endif
// commentaire

class Base { 
public: 
  void a() { cout << "Base::a" << endl; } 
  virtual void b(); { cout << "Base::b" << endl; } 
}; 

int main() 
{ 
  Base x; 
  x.a(); // affiche Base::a 
  x.b(); // affiche Base::b 

  // le cas intéressant 
}
C#
// code en début
         // Déclaration des variables 
         ArrayList CompteurXML = new ArrayList(); 
         ArrayList CompteurSQL = new ArrayList(); 
 /* ..0
 000
 01
 00 */
// qlksfj
#define ssdfsfsdf
// skfskjfhd
#define sùfsmdf
         string sNomTable = Table.TableName; 

         // CompteurXML contient maintenant la liste des champs de la table 
         // passée en paramètre (provenant du fichier XML) 

         for ( int i = 0; i < dsTableSQL.Tables[0].Rows.Count - 1; i++ ) 
         { 
            object [] ligne = dsTableSQL.Tables[0].Rows[i].ItemArray; 

         }

4-E. CSS

css
/* définition du style de la police, et largeur du select */
select {
font-family : Courier ;
font-size : 10px ;
width : 200px;
}

/* élément de couleur bleu */
option.bl_eu 
{
color : #0000FF ;
background-color :#00CCFF ;

background : blue url(img.png) ; 
background-color : blue ; 
background-image : url(img.png) ; 

}

4-F. Delphi et Delphi pour .NET

delphi
// commentaire
{
Un commentaire sur
plusieurs lignes }
{$ une directive }
Var i:Integer;
<a href="lien.html?parametre1=valeur1&parametre2=valeur2">test</a>

(*
Et un autre
*)
begin
  For i:=Onglet.PageCount-1 DownTo 0 Do
  Begin
    Onglet.ActivePageIndex:=i;
    // En commentaire d ON ' euuuuuu
    ShowMessage('Truc muche !'kqjhsd'jhkjh''''''hghg''''hg'); // c'est un comment !
    { et un autre }
    FileName:= 'Document.doc'; // ou 'Document.rtf'
    URL ='http://toto.com';
  End;
end;
delphi pour .NET
// commentaire
{
Un commentaire sur
plusieurs lignes }
{$ une directive }
Var i:Integer;
(*
Et un autre
*)
begin
  For i:=Onglet.PageCount-1 DownTo 0 Do
  Begin
    Onglet.ActivePageIndex:=i;
    // En commentaire d ON ' euuuuuu
    ShowMessage('Truc muche !'kqjhsd'jhkjh''hghghg'); // c'est un comment !
    { et un autre }
    FileName:= 'Document.doc'; // ou 'Document.rtf'
    URL ='http://toto.com';
  End;
end;

4-G. INI

ini
[EditeurXML]
Nouveau=
Recent0="C:\BRUNO\HTML\kit.4.0.17\documents\tables\tables.xml"
Recent1="C:\BRUNO\HTML\kit.4.0.17\documents\srcdelphi\srcdelphi.xml"
SommaireWidth=310
WINDOWSTATE=2
WIDTH=696
HEIGHT=480
LEFT=162
TOP=44
TimerMAJSommaire=1000

4-H. Java

java
// un comment en deb
public class MaClasse{
   public static Map uneVariableStatique = new HashMap();
   static{
/*      uneVariableStatique.put("une clef","une valeur");
      uneVariableStatique.put("une autre clef","une autre http:// jshdjshd");*/
      //etc un comment et import
      uneVariableStatique.put("une clef","une http://valeur");
      uneVariableStatique.put("une autre clef","une autr\"e valeur\\\"");
   qal.declareImports("import com.unilog.data.Track"); 
   import toto;
   }

}
java
package test;

import java.io.Serializable;
import java.util.Date;

/**
 * Commentaire JAVADOC {@link http://javasearch.developpez.com} 
 * @author adiGuba
 * @since 1.5
 * @see String
 */
public abstract strictfp class TestAno extends Object implements Serializable {
    
    interface Marqueur {}
    
    @interface AnnotationMarqueur {}
    
    enum TestEnum {VALEUR1, VALEUR2, VALEUR3; }
    
    private volatile Date date;
    protected transient Object obj;
    public static final String TEST = "Une chaine et une \"sous-chaine\"";
    
    /**
     * @deprecated message
     */
    @Deprecated
    public TestAno() {
        this(new Date());
    }
    
    /**
     * Information sur le constructeur en <b>HTML</b>
     * @param d
     * @throws NullPointerException
     * @exception NullPointerException
     */
    public TestAno(Date d) {
        super();
        this.date = new Date(d.getTime());
    }
    
    /**
     * @return Date...
     */
    @Override
    @SuppressWarnings("deprecation")
    public String toString() {
        return date.getDate() + "/" + date.getMonth() + "/" + (1900 + date.getYear());
    }
    
    /*
     * Commentaire /* test
     */
    public void method(boolean b, short s, int i, long l,
            float f, double d, char c) {
        // ... commentaire sur une ligne
        synchronized (this) {
            /*
             * Commentaire sur plusieurs lignes... 
             */
        }
    }

}

4-I. Javascript

JavaScript
variable1 = document.formulaire.champs1.value; 
/*variable1 = 12 */
variable2 = "qhkjqhfkq"; 
/*variable2 = 20 */
total = variable1 + variable2; 
/*total = 1220 */

4-J. Shell linux

linux
#!/bin/bash 
export PATH=$PATH:.
# preparation du repertoire destination
prepareMainDirs html cache archives pdf
prepareGenDirs $1 html cache


echo " Application de la coloration syntaxique" 
perl coloration.pl ../documents/$1/$1.xml ../ArtTmp.xml > buildart.log 

echo " Construction des pages html" 
#Ligne modifiée par sinarf pour générer les fichiers php pour la version online. 
perl buildart.pl ./../ArtTmp.xml ./../html/$1/ ./../cache/$1/ $1 

cd ./../html/ 
java -jar ./../script/lib/Zippeur.jar ./../archives/$1.zip $1
if test $? -ne 0; then 
  	echo Echec lors de la creation du zip. 
  	exit 1 
  else
  	echo ==OK==
fi 
cp ../documents/$1/$1.xml ../html/$1/ 
#suppression du fichier temporaire. 
rm ../ArtTmp.xml > buildart.log  
xxd xxdxxd 'slfshldfhl'    anacron bison php
 lkjlj "lkjlsjdf"  55 55.999 ddd555 -666 +777 sldfkjg
 +999 lksfgh 555  `xc,;vnx;  xcvxcv `
shellscript
#!/bin/bash 
export PATH=$PATH:.
# preparation du repertoire destination
prepareMainDirs html cache archives pdf
prepareGenDirs $1 html cache


echo " Application de la coloration syntaxique" 
perl coloration.pl ../documents/$1/$1.xml ../ArtTmp.xml > buildart.log 

echo " Construction des pages html" 
#Ligne modifiée par sinarf pour générer les fichiers php pour la version online. 
perl buildart.pl ./../ArtTmp.xml ./../html/$1/ ./../cache/$1/ $1 

cd ./../html/ 
java -jar ./../script/lib/Zippeur.jar ./../archives/$1.zip $1
if test $? -ne 0; then 
  	echo Echec lors de la creation du zip. 
  	exit 1 
  else
  	echo ==OK==
fi 
cp ../documents/$1/$1.xml ../html/$1/ 
#suppression du fichier temporaire. 
rm ../ArtTmp.xml > buildart.log  
xxd xxdxxd 'slfshldfhl'    anacron bison php
 lkjlj "lkjlsjdf"  55 55.999 ddd555 -666 +777 sldfkjg
 +999 lksfgh 555  `xc,;vnx;  xcvxcv `

4-K. Oracle

oracle
CREAte TABLE	hr.emp
(
	empno	NUMBER(5)		PRIMARY KEY,
	ename	VARCHAR2(15)	NOT NULL,
	job	VARCHAR2(10),
	mgr	NUMBER(5),
	hiredate	DATE		DEFAULT sysdate,
	sal	NUMBER(7,2),
	com	NUMBER(7,2),
	deptno	NUMBER(3)		NOT NULL
		CONSTRAINT dept_fk REFERENCES hr.departments
		(department_id)
)
TABLESPACE	tbs1
 -- on prend tous les entiers de la table #n moins les entiers de la table #n pour 
STORAGE
(
	INITIAL		50K
	NEXT		50K
	MAXEXTENTS	10
	PCTINCREASE	25
) ;

4-L. Autre

other
COPY *.* C:\TEMP\BACKUP

4-M. Perso

Coloration personnalisée
// quartier courant
soit Quarter de type TChartQuarter;
// informations de graphismes du quartier courant dans son état
soit Graphics de type TChartQuarterGraphics;
// angle de départ, de milieu et de fin du quartier
soient MinAngle, MidAngle et MaxAngle de type Single;
// points sur la circonférence correspondants aux angles
soient MinPt, MidPt et MaxPt de type TPoint;
// point sur lequel centrer le texte
soit TextPos de type TPoint;
// le texte à afficher dans le quartier
soit Text de type string;

4-N. PHP

php
if($truc === TRUE){
	echo("Hello $bidule ...");
}
php_mixte
<!-- Un peu de css dans le php -->
<style type="text/css">
	.machin {
		font-family: Verdana, sans-serif;
	}
</style>
<!-- Ceci est du php -->
<?php 
if($truc === TRUE){
	echo("Hello $bidule ...");
}
?>

<!-- Ceci n'est pas du php -->
if($truc === TRUE){
	echo("Hello $bidule ...");
}

<!-- Ceci est du php -->
<?
if($truc === TRUE){
	echo("Hello $bidule ...");
}
?>
php_mixte
<?php

${'variable_1'} = 'Premier essai';
$variable_2 = 'Second essai';

echo $varia

?>

str_replace("\\", "\\\"","/", $current_dir); // Utilisateurs de Windows, pens

<?php
	error_reporting(E_ALL);
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Document sans titre</title>
</head>

<body>
<?php
	// Exemple de code PHP pour Ano
	/*Merci de ne pas faire gaffe à ce code crade*/
	/* C'est juste pour un test, donc ce sera horrible volontairement
		pis d'abord, si vous être pas contents, je vous dit "zut"
		Inutile de chercher à exécuter ce code, il ne fait absolument rien... */

	/*

	En PHP, les blocs de commentaires commencent par /* et finissent par *\/. 
	Les lignes de code ci-dessous gèrent la connexion à la base :

	$host = 'localhost';
	$user = 'root';
	$bdd = 'ma_base';
	$passwd  = '';
	mysql_connect($host, $user,$passwd) or die('erreur de connexion au serveur');
	mysql_select_db($bdd) or die('erreur de connexion a la base de donnees');

	si c'est pas mignon tout plein ça...
	//*/

	$id_temp = 2.234343;
	$id_temp += .1454545;
	$id_temp = $id_temp-1.254624;
	$id_temp = $id_temp+1243423;

	if (comment == FALSE) {
	echo 'Error'.$myVar/*.' !!!!'*/;
}
	$mot[0] = "toto c est le plus beau, et c est \"Monsieur\" toto, ";
	$mot[0] = "toto c', je veux afficher des // , des /* , et des */ dans ma chaîne";
	$mot[1] = $_GET['toto'];
	$mot[1] = $_POST['toto'];
	$mot[1] = $_SERVER['toto'];
	$mot[1] = $_ENV['toto'];
	$mot[1] = array_diff_uassoc(toto(ARRAY_Multisort(hw_Document_Attributes()));

	$SQL_guillemet = "SELECT * FROM MA_TABLE WHERE ID = $id_temp AND MOT = '$mot[0]'";
	$SQL_quote = 'SELECT TOTO FROM MA_TABLE WHERE ID = '.$id_temp.' AND MOT = \''.$mot[0].'\'';

class MySystemException extends Exception
{
    /**
    * @desc Constructeur
    */
    public function __construct($msg, $code, $file, $line, $context)
    {
        $this->message = $msg;
        $this->code = $code;
        $this->line = $line;
        $this->file = $file;
        $this->context = $context;
        
        parent::__construct($msg, $code);
    }
    
    /**
    * @desc Affichage de l'erreur
    */
    public function showError()
    {
        echo 'PHP a généré l\'erreur système suivante : ['.$this->code.' | '.
            $this->getMessage().'] à la ligne '.
            $this->line.' du fichier '.$this->file;
        
        // $Mytrace contient le contexte de l'exception
        // $this->context contient le contexte de l'erreur
        
        $Mytrace = $this->getTrace();
        //print_r($Mytrace);
        if ( ! empty($Mytrace['1']['function'] ))
        {
            echo ' sur la fonction '.$Mytrace['1']['function'];
        }     
        echo '<br /><br/>Contexte lors de l\'erreur :<br/><pre>';
        print_r($this->context);
        echo '</pre>';
    }
}
php_mixte
<?php

/* Version : 30 septembre 2006 */

require_once('C:/Mes Documents/Web/includes/poka-yoke/main.php');

class Login extends DVP_DataFilter
{
    public function __construct()
    {
        parent::__construct($_POST);

        $this->filterSingleLine('login');
        $this->untaint('password');
        $this->filterUsingArray('persistant', array('yes'), DVP_DataFilter::ARRAY_STRINGS);

        $this->clean();

        unset($_POST);
    }
}


if(!empty($_POST))
{
    //
    // Initialisation du filtre
    //
    $_POST = new Login();

    //
    // Utilisation : méthode 1
    //
    $sql = 'SELECT id
            FROM user
            WHERE login = "'.$_POST->getHTML('login').'"
            AND password = "'.md5($_POST->getRaw('login')).'"';

    //$result = mysql_query($sql);
    if(/*$user = mysql_fetch_assoc($result)*/true)
    {
        echo 'Connecté en tant que '.$_POST->getHTML('login').'<br />';
        if(!$_POST->isEmpty('persistant'))
        {
            // sessions...
        }
    }

    echo '<br /><br />';

    //
    // Utilisation : méthode 2
    //
    foreach($_POST as $field)
    {
        echo '<b>'.$field.'</b> : '.$_POST->getHTML($field).'<br />'."\n";
    }

    echo '<br /><br />';
}

?>


<form method="post" action="<?php echo basename(__FILE__); ?>" style="width: 100%; text-align: center; border: 1px solid black;">
    <label><input type="text" name="login" /> Nom d'utilisateur</label><br />
    <label><input type="password" name="password" /> Mot de passe</label><br />
    <label><input type="checkbox" name="persistant" value="yes" /> Rester connect&eacute; ?</label><br />

    <input type="submit" value="Envoyer" />
    <input type="reset" value="Rétablir" />
</form>

4-O. PostGreSQL

postgresql
SELECT setval('ma_sequence',456);          -- on initialise ma_sequence à 456	
SELECT nextval('ma_sequence');             -- on incremente la proobtenons 457
SELECT currval('ma_sequence');             -- on demande lanons 457

4-P. Python

python
def toHtml(self, htmlFile):
        """
            Ecris dans un fichier HTML la transformation
            du fichier XML.
            Si True est retourné, c'est que tout c'est bien passé.
            Si def est retourné, des erreurs se sont produites.
        """
        if (os.path.exists(self.xslFile) == False):
            print ('Le fichier XSL n\'existe pas')
            return False
        if (os.path.exists(self.xmlFile) == False):
            print ("Le fichier XML n\'existe pas")
            return False
        if (os.path.exists(self.xslFile) == False):
            print ('Le def XSL n\'existe pas')
            return False
        styuri = OsPathToUri(self.xslFile)
        srcuri = OsPathToUri(self.xmlFile)
python
# -*- coding: cp1252 -*-
import time

class Toto:
    """ classe test """
    def __init__(self):
        self.a = 5 # un entier
        self.b = 7
    @deco
    def affiche(self):
        for i in range(100):
            if self.value > 10: print "on affiche un string"
            elif self.value < 5: print 'toto'
            else: print 0xA15F
        return "'chaine entre cotes'"

4-Q. SQL

SQL
-- Commentaire
/* ssfdf
sdfsdfsf SELECT
sdfsdfsd*/
SELECT * FROM TOTO WHERE TITI="ksjdhfskdjhf WHERE"
skdhf

4-R. VB , VB.NET

vb
dfdf " erkejr " ' Initialisats
Private Sub Form_Load()
   ' Initialisation de l'accès aux données
    Dim MaBD As String
    Dim i as Integer
    
    MoyMax = Format(MoyMax / 12, "#0.0   " ddd " eee ")   ' commentaire " h
 
   ' Initialisation du graphique simple
    MoyMax = Format(MoyMax / 12, "#0.0 ' ")  ' commentaire " tftftf " hghgg
    MSChart1.AllowSelections = False    ' Interdit la sélection dans le graphe
    MoyMax = Format(MoyMax / 12, "#0.0 ' ")  ' commentaire " tftftf " hghgg
    MoyMax = Format(MoyMax / 12, "#0.0 ' ")  ' commentaire " tftftf " hghgg
End Sub
vb
'-- Déclarations
Private Const ERROR_SUCCESS As Long = 0&
Private Const WM_USER As Long = &H400
Private Const MAX_PATH As Long = 260

Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
                                                                       ByVal wParam As Long, ByVal lParam As Any) As Long

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Dim i As Integer
    On Error GoTo Command1_MouseDown_Error
    If Button = 2 Then
        Dim objHelp As Chelp
        Set objHelp = New Chelp
        Call objHelp.Show(App.HelpFile, "W1", 10)
        Set objHelp = Nothing
    End If

    '-- commentaire inutile
    For i = 1 To UBound(Montab)
        Debug.Print i
    Next i
    Do
        i = i + 1    'autre commentaire
    Loop Until i > 10
    Exit Sub

Command1_MouseDown_Error:
    Select Case Err
    Case 32755
    Case Else
         MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure Command1_MouseDown of Feuille Form1" 'message d'erreur
    End Select
    Err.Clear
End Sub

Private Sub Form_Load()
Dim objHelp As Chelp
    App.HelpFile = App.Path & "\TestProg.chm"
    Set objHelp = New Chelp
    Call objHelp.HelpInit
    Set objHelp = Nothing
    MsgBox Me.UserControl11.MaProp
End Sub
MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure Command1_MouseDown of Feuille Form1" 'message d'erreur
vbnet
' skdjfhskdfh
 ' sdkfsldkjfsldj
 sdfs< ' sfsjldkfjsdf
Imports System
Imports System.Text.RegularExpressions

Dim s As String = "SELECT * FROM matable WHERE madate='aujourd'hui' AND flag=1"

Char &
NameSpace ExemplesRegEx &
	Public Class Verification
		Shared Sub Main()
			Dim verif as Regex = new Regex("[0-9]{10}")
			Dim numero as String = "0123456789"
			Dim isNumero As Boolean = verif.IsMatch(numero)
			If isNumero Then
				Console.WriteLine("Le numéro de téléphone est valide ")
			Else
				Console.WriteLine("Le numéro de téléphone n'est pas valide ")
			End If
		End Sub
	End Class
End NameSpace

4-S. XML

xml
<?xml version="1.0" encoding="ISO-8859-1"?>
<document>
	<xiti>
		<!-- compteur Dotnet-->
		<alias>Dotnet</alias>
		<logg_er>logv99</logg_er>
		<id>12345</id>
	</xiti>
</document>
<a href="lien.html?parametre1=valeur1&aparametre2=valeur2">test</a>
&jhgsjdgs; qsdlfhqsdf ; qsdfqsd  &dfdfd dfdf &#9999   &#9999; sjskdh

 

Valid XHTML 1.1!Valid CSS!

Ce document ment ment est issu de http://www.developpez.com et reste la propriété exclusive de son auteur. La copie, modification et/ou distribution par quelque moyen que ce soit est soumise à l'obtention préalable de l'autorisation de l'auteur.