Mistři v programování na #hovnokod

Visual Basic #608

' Return the current date & time converted to GMT in string format
Public Function gf_GetGMTDateTimeString
	Dim strDateTime
	strDateTime=FormatDateTime(date(),vbgeneraldate) & " " & FormatDateTime(now(),vblongtime)
	strDateTime=DateAdd("h", -5, strDateTime)
	strDateTime=DateAdd("n", -30, strDateTime)
	gf_GetGMTDateTimeString=strDateTime
End Function

HovnoKod,