split dato men ikke tekst

Hey E

IIS5.0/ASP/IE

Jeg splitter db-data fint såfremt data er i dette format: fx: 05/05/05 eller 05/04/01

men hvordan splitter jeg på db-data ala: Udløbet eller fisk
der opstår i samme kolonne, og derved er med i db-løkken?

koden nu:

    Function valLBV(ByVal varDato) 'LBV = Lox + Batt + Våben
        If varDato <> "" Then
        varD1 = split(varDato, "/")
        varD2 = varD1(2) & "-" & varD1(1) & "-20" & varD1(0)
            If Datediff("D", varD2, date) > 59 Then
                valLBV = "style=""color:black;background-color:yellow;"" "
            End if
        End if
    End function

Ønskes:
    Function valLBV(ByVal varDato) 'LBV = Lox + Batt + Våben
        If varDato <> "" Then
                if NOT varDato "TJEK FOR TEKST ala FISK ol." Then
        varD1 = split(varDato, "/")
        varD2 = varD1(2) & "-" & varD1(1) & "-20" & varD1(0)
            If Datediff("D", varD2, date) > 59 Then
                valLBV = "style=""color:black;background-color:yellow;"" "
            End if
        End if
    End function

:/