Visual Basic

<br />
Imports System.Text.RegularExpressions<br />
Public Class AntiSQLInjectionHelper<br />
<br />
    Private Sub New()<br />
    End Sub<br />
<br />
    Public Shared Function CheckString(ByVal Value As String, ByVal [CheckType] As CheckType) As Boolean<br />
        Dim pattern As String<br />
        Select Case [CheckType]<br />
            Case CheckType.DateString 'Checks for accepted date format<br />
                pattern = "TODO"<br />
            Case CheckType.General 'Checks for accepted general format (ie one that doesn't contain any DROP commands etc)<br />
                pattern = "TODO"<br />
            Case CheckType.NumberString 'Checks for accepted number format<br />
                pattern = "TODO"<br />
            Case CheckType.PasswordString 'Checks for accepted password format<br />
                pattern = "TODO"<br />
            Case CheckType.UsernameString 'Checks for accepted username format<br />
                pattern = "TODO"<br />
        End Select<br />
        Return Regex.IsMatch(Value, pattern)<br />
    End Function<br />
<br />
    Public Enum CheckType<br />
        DateString<br />
        NumberString<br />
        UsernameString<br />
        PasswordString<br />
        General<br />
    End Enum<br />
<br />
End Class<br />
<br />