Führende null

[Helmut]

ich holl mir die daten so aus der datenbank

jjjj = "" & RS("jjjj") & ""
mm = "" & RS("mm") & ""
tt = "" & RS("tt") & ""
hh = "" & RS("hh") & ""
min = "" & RS("min") & ""

und so splitte ich das andere Datum:

docdatumuhrzeit = Split(rsIX("Write")," ")
docdatum = docdatumuhrzeit(0)
docuhrzeit = docdatumuhrzeit(1)
docdatumsp = Split(docdatum,".")
docuhrzeitsp = Split(docuhrzeit,":")
doctt = "" & docdatumsp(0) & ""
docmm = "" & docdatumsp(1) & ""
docjjjj = "" & docdatumsp(2) & ""
dochh = "" & docuhrzeitsp(0) & ""
docmin = "" & docuhrzeitsp(1) & ""