VB6 quotes escape

For the second question, look at using DateDiff() instead:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vsfctdatediff.asp

can you run some datediff code by me so i can see what i need to do to get the time my program has been running?

also, without luck i was trying to find a function that will format the date as such: Fri, 04 Mar 2005 21:15:18 GMT

The following shows the elapsed time your app has been running in Label1.  The code in the buttons shows how to format a date almost like you want.  I'm not sure how you would go about getting the "GMT" part....

Option Explicit

Private startTime As Date

Private Sub Command1_Click()
    MsgBox Format(Now(), "Long Date") & " " & Format(Now(), "Long Time")
End Sub

Private Sub Form_Load()
    startTime = Now
    Timer1.Interval = 333
End Sub

Private Sub Timer1_Timer()
    Dim secs As Long
    Dim mins As Long
    Dim hrs As Long
   
    secs = DateDiff("s", startTime, Now())
           
    hrs = secs \ 3600
    secs = secs - (hrs * 3600)
           
    mins = secs \ 60
    secs = secs - (mins * 60)
           
    Label1.Caption = Format(hrs, "00") & ":" _
        & Format(mins, "00") & ":" & Format(secs, "00")
End Sub

runtime error '6';
overflow

->     secs = DateDiff("s", startTime, Now())


actually i dont know about the GMT part, it was just there. the date format im trying to match, is that of a HTTP header date.

To display the accumulated running time this may help:

Dim time1 As Date
Dim time2 As Date
Dim dtDiff As Date

time1 = Now()
time2 = #1/1/2005#

dtDiff = time1 - time2

MsgBox "Running time: " & DateDiff("d", time2, time1) & " days + " & Format(dtDiff, "hh:nn:ss")

well that one seems to be off a bit
62 days + 19:58:53.

ok i did form load time 1 and when calling the uptime i did time2=now hopefully this will work without bugs.