ASP Datum probleem

[Denga]

Ik heb een probleem met een script wat ik heb gemaakt voor een website.

code:

function fixDate(pNewFormat)        

    pToken1 = inStr(pNewFormat, "/")
    pToken2 = inStr(mid(pNewFormat,pToken1+1, len(pNewFormat)) , "/" ) 
    
    pPart1 = mid(pNewFormat,1,pToken1-1) 
    pPart2 = mid(pNewFormat,pToken1+1,pToken2-1)
    pPart3 = mid(pNewFormat,pToken2+pToken1+1,len(pNewFormat))
    
    if len(pPart1) = 1 then
        pPart1  = "0" & pPart1
    end if
    if len(pPart2) = 1 then
        pPart2  = "0" & pPart2
    end if
    if len(pPart3) = 2 then
        pPart3  = "20" & pPart3
    end if
    pNewFormat =   pPart1 & "/" & pPart2 & "/" & pPart3  
    
    fixDate = pNewFormat
end function

Nu krijg ik op de server de error:

code:

Microsoft VBScript runtime error '800a0005' 

Invalid procedure call or argument: 'mid' 

/test/includes/dateFunctions.asp, line 27

Deze slaat terug op regel 6 van het codestukje.
Ik heb alles al geprobeerd maar ik kan niet inzien waar het probleem zit aangezien de volledige opbouw in mijn ogen 'klopt'.

[mulder]

Teneerste weten we zo niet wat regel 27 is.
Vermoedelijke knip je vanaf een index die niet bestaat. Maar dit is een dure omslachtige methode om een probleem te omzeilen. Je moet zorgen dat de datuminstellingen van je applicatie goed zijn.

[RobIII]

Kijk hier eens naar: Debuggen: Hoe doe ik dat?

Dit is gewoon een kwestie van even debuggen en zelf een beetje moeite doen. Daarnaast is dit nogal een 'quickfix' request; en daar doen we niet aan hier Ook wil ik je (nogmaals) wijzen op onze Programming Beleid Quickstart; die hebben we niet voor niets en we verwachten dat je toch wel minimaal een beetje in de buurt komt van wat daar beschreven staat. Dat doet je topic nu in de verste verte niet.

Tot slot; waarom maak je niet gewoon gebruik van de datum functies in ASP?

[ Voor 36% gewijzigd door RobIII op 29-03-2007 13:31 ]