【修改时间】【转换时间】【ftp下载】
在ftp服务器上下载了文件,并读取了该文件的时间属性,把ftp文件的时间赋给了当地下载了的文件,但是差8个小时,如何使时间一致啊?部分代码如下
hConnection = InternetConnect(hOpen, ip, 0,username, password, 1, 0, 0)
bRet = FtpSetCurrentDirectory(hConnection, FtpServerDir)
pData.cFileName = String(MAX_PATH, 0)
hFind = FtpFindFirstFile(hConnection, "*.gz", pData, 0, 0)
mfile = Left(pData.cFileName, InStr(1, pData.cFileName, String(1, 0), vbBinaryCompare) - 1)
FileHandle = CreateFile("c:\"+mfile, GENERIC_WRITE, FILE_SHARE_READ Or FILE_SHARE_WRITE, ByVal 0&, OPEN_EXISTING, 0, 0) {{文件名为mfile已下载在当地"c:\"下}}
SetFileTime FileHandle, pData.ftCreationTime, pData.ftLastAccessTime,pData.ftLastWriteTime
如何改代码使修改时间一致,而不相差8小时?
高手请帮忙啊!