一行ずつトラップしてみたところ > nDays = nTransmitTimeStampSeconds \ 86400@ > nSecs = nTransmitTimeStampSeconds Mod 86400@ 上記の2行でエラーが起こっているようです ちなみに値ですが nTransmitTimeStampSecondsが997973442 nDaysが11550 nSecsが53442 でした dteTime = CDate(Format(DateAdd("d", nDays, "1970/01/01"), "yyyy/mm/dd") & " " & nHours & ":" & nMinutes & ":" & nSecs) に修正してから試しました
VB5はMe未対応ですか(^^;) 確かにSEとは日付の桁数も違ってたり 細かいところで違いがありますからねぇ〜
ではでは
|