problems with formatting text

[bis]

i have a text box i want to put the time and date in so i can keep track of the times the tests are run

Code:

SwfWindow("Form").SwfEdit("TextboxName").Set "time " & Time()

the problem is i want to format the time a certain way so i wrote this function

Code:

Function formatmyTime
Dim myTime
FormatDateTime Now(), 3
myTime = "Time = " & Month(Now()) & "." & Day(Now()) & "." & Year(Now()) & " " & Time()
myTime = Replace(myTime,":",".")
End Function

myTime should now be 7.15.2008 9.25.57 AM
now how do i make it call myTime

Code:

SwfWindow("Form").SwfEdit("TextboxName").Set "time " & Time()

the reason is that it creates so many records in the database i wanted to add the seconds to them i can search the database easier. and the reason i have to format it is because my textbox does not allow the : character

[Ankur]

you need to do a small change in code:

Code:

Function formatmyTime
Dim myTime
FormatDateTime Now(), 3
myTime = "Time = " & Month(Now()) & "." & Day(Now()) & "." & Year(Now()) & " " & Time()
formatmyTime = Replace(myTime,":",".")
End Function

Code:

SwfWindow("Form").SwfEdit("TextboxName").Set "formatmyTime"