Dieser Artikel ist ein Artikel über die detaillierte Erklärung der Verwendung regulärer Ausdrücke unter ASP. Ich empfehle jedem, ihn zu lesen. Kopieren Sie den Codecode wie folgt:
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Pattern = ab+c 'Definieren Sie ein reguläres Ausdrucksliteral. Sie können den regulären Ausdruck hier ersetzen
Dimme myString
myString = abcefg 'Definieren Sie die Zeichenfolge, die abgeglichen werden soll und ersetzt werden kann
Response.write(re.Execute(myString)(0)) 'Übereinstimmungstest durchführen und das Ergebnis schreiben
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Pattern = /w+ 'Text für reguläre Ausdrücke definieren
Dimme myString
myString = VBScript Version 5.6 bietet viele neue Funktionen.
'Führen Sie einen Matching-Test durch und schreiben Sie, ob der Match erfolgreich ist
Wenn re.Test(myString) Dann
Response.write(Match erfolgreich!)
Anders
Response.write (Abgleich fehlgeschlagen!)
Ende wenn
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Pattern = /s 'Regulären Ausdruckstext definieren, hier passendes Leerzeichen
Dimme myString
myString = VBScript Version 5.6 bietet viele neue Funktionen.
myString = re.replace(myString, -) 'Leerzeichen durch - ersetzen und die ersetzte Zeichenfolge zurückgeben
„Schreiben Sie das Ergebnis
Response.write(myString)
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Global = True
re.Pattern = /s 'Regulären Ausdruckstext definieren, hier passendes Leerzeichen
Dimme myString
myString = VBScript Version 5.6 bietet viele neue Funktionen.
myString = re.replace(myString, -) 'Leerzeichen durch - ersetzen und die ersetzte Zeichenfolge zurückgeben
„Schreiben Sie das Ergebnis
Response.write(myString)
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Global = True
re.Pattern = (/w+)-(/w+) 'Definieren Sie Mustertext für reguläre Ausdrücke
Dimme myString
myString = Flip-Flop
myString = re.replace(myString, $1-$2)
'$1 repräsentiert das erste /w+, $2 repräsentiert das zweite /w+, das erste /w+ entspricht dem Flip und das zweite /w+ entspricht dem Flop,
„1-$2 entspricht also einem Flip-Flop.“
„Schreiben Sie das Ergebnis
Response.write(myString)
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Global = True
re.Pattern = (/S+)(/s+)(/S+) 'Mustertext für reguläre Ausdrücke definieren
Dimme myString
myString = Flip-Flop
myString = re.replace(myString, $3$2$1)
'$1 repräsentiert das erste /S+, $3 repräsentiert das zweite /S+, $2 repräsentiert /s+,
„$3$2$1 entspricht also einem Flop-Flip.“
„Schreiben Sie das Ergebnis
Response.write(myString)
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
re.Global = True
re.Pattern = /w+ 'Mustertext für reguläre Ausdrücke definieren
Dimme myString
myString = VBScript Version 5.6 bietet viele neue Funktionen.
Set Matches = re.Execute(myString) 'Suche ausführen, diese Sammlung wird zum Speichern passender Ergebnisse verwendet
„Führen Sie einen Matching-Test durch und schreiben Sie die Ergebnisse auf.“
'Durchlaufe die Matches-Sammlung
Für jedes Spiel in Spielen
„Schreiben Sie das Ergebnis
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
Nächste
%>
Kopieren Sie den Codecode wie folgt:
<%
Dim re
Set re = new RegExp 'RegExp-Instanz erstellen
're.Global = True, kommentieren Sie diese Zeile aus
re.Pattern = /w+ 'Mustertext für reguläre Ausdrücke definieren
Dimme myString
myString = VBScript Version 5.6 bietet viele neue Funktionen.
Set Matches = re.Execute(myString) 'Suche ausführen, diese Sammlung wird zum Speichern übereinstimmender Ergebnisse verwendet
„Führen Sie einen Matching-Test durch und schreiben Sie die Ergebnisse auf.“
'Durchlaufe die Matches-Sammlung
Für jedes Spiel in Spielen
„Schreiben Sie das Ergebnis
Response.write(Match.FirstIndex & - & (Match.FirstIndex + Match.Length) & & Match.Value & <br />)
Nächste
%>
Kopieren Sie den Codecode wie folgt:
<%@sprache=vbscript codepage=65001%>
<%
'Erstellen Sie eine Verbindung und erstellen Sie einen ADODB.Befehl für den Betrieb
Dim oCmd,oConn
Setze oConn = Server.CreateObject(ADODB.Connection)
Setze oCmd = Server.CreateObject(ADODB.Command)
oConn.ConnectionString = Provider=SQLOLEDB;server = myhost;Initial Catalog = myDatabase;UID=sa;PWD=verysecret;
oVerbindung öffnen
'Erstellen Sie hier eine SQL CREATE TABLE-Anweisung
Legen Sie oCmd.ActiveConnection = oConn fest
oCmd.CommandText = CREATE TABLE NewEmployees(firstName nvarchar (50),lastName nvarchar (50),EmpType nvarchar (50))
'Führen Sie den Vorgang zum Erstellen einer Datentabelle aus
oCmd.Execute
Response.Write(Vorgang erfolgreich!)
%>
<%
'Schließen Sie die Verbindung explizit
oConn.Close
Setzen Sie oConn = Nothing
%>