large_integerVB获取可移动磁盘的序列号和容量

large_integer  时间:2021-06-17  阅读:()

用字母代替数字,sleep被什么代替

方法一:就是你说的Sleep 使用sleep函数的不利处在于期间不能处理其他的消息,如果时间太长,就好象死机一样,所以我们利用 COleDateTime类和COleDateTimeSpan类结合WINDOWS的消息处理过程来实现延时: COleDateTime start_time = COleDateTime::GetCurrentTime(); COleDateTimeSpan end_time = COleDateTime::GetCurrentTime()-start_time; While(end_time.GetTotalSeconds() <= 2) //实现延时2秒 { MSG msg; GetMessage(&msg,NULL,0,0); TranslateMessage(&msg); DispatchMessage(&msg); End_time = ColeDateTime::GetCurrentTime-start_time; }//这样在延时的时候我们也能够处理其他的消息。

方法三: 可以采用GetTickCount()函数,该函数的返回值是DWORD型,表示以毫秒为单位的计算机启动后经历的时间间隔。

DWORD dwStart = GetTickCount(); DWORD dwEnd = dwStart; do { MSG msg; GetMessage(&msg,NULL,0,0); TranslateMessage(&msg); DispatchMessage(&msg); dwEnd = GetTickCount(); } while((dwEnd - dwStart) <= 2000); 上面的方法在延时的精确度上,很多时候不能满足我们的要求,下面是一种更精确的微秒级延时: LARGE_INTEGER litmp ; LONGLONG QPart1,QPart2 ; double d=0; QueryPerformanceCounter(&litmp) ; // 获得初始值 QPart1 = litmp.QuadPart ; while (d<40)//你想要的时间 { QueryPerformanceCounter(&litmp) ; QPart2 = litmp.QuadPart ; d=(double)(QPart2 - QPart1); }

MoveFileWithProgress函数怎么用?

MoveFileWithProgress 功能与 MoveFileEx 是相同的,只不过 MoveFileWithProgress 允许你提供一个接收移动进度消息的回调函数。

MoveFile 函数移动已存在的文件或文件夹,包括它的子文件和文件夹。

只能在同一目录或volume(卷)下移动

MoveFileEx or MoveFileWithProgress 指定如何去移动文件。

可以在不同volume下移动,但必须指定MOVEFILE_COPY_ALLOWED,但有时移动不成功,会出现error(5)的错误,这跟系统的读取权限有关。

MoveFileTransacted 允许执行事务处理的操作。

#define _WIN32_WINNT 0x0500 // 不加这个不同通过编译 #include <windows.h> #include <stdio.h>

DWORD CALLBACK CopyProgress( LARGE_INTEGER TotalFileSize, // total file size, in bytes LARGE_INTEGER TotalBytesTransferred, // total number of bytes transferred LARGE_INTEGER StreamSize, // total number of bytes for this stream LARGE_INTEGER StreamBytesTransferred, // total number of bytes transferred for this stream DWORD dwStreamNumber, // the current stream DWORD dwCallbackReason, // reason for callback HANDLE hSourceFile, // handle to the source file HANDLE hDestinationFile, // handle to the destination file LPVOID lpData // passed by CopyFileEx ) { static int nRecord = 0; nRecord++; printf("回调次数:%d 已传输:%08X:%08X 文件大小:%08X:%08X ", nRecord, TotalBytesTransferred.HighPart, TotalBytesTransferred.LowPart, TotalFileSize.HighPart, TotalFileSize.LowPart); return PROGRESS_CONTINUE; }

int main(int argc, char* argv[]) { if(argc!=3) { printf("用法:命令 源文件 目标文件"); return 0; }

if(!CopyFileEx(argv[1],argv[2],(LPPROGRESS_ROUTINE)CopyProgress,NULL,FALSE,COPY_FILE_FAIL_IF_EXISTS)) { printf("CopyFileEx() failed."); return 0; } return 0; }

VB获取可移动磁盘的序列号和容量

Private Declare Function GetLogicalDriveStrings Lib "kernel32" Alias _ "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, _ ByVal lpBuffer As String) As Long 取得当前所有盘符 Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" _ (ByVal nDrive As String) As Long 判断盘符类型 Private Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long, lpTtoalNumberOfClusters As Long) As Long 这个或者下面函数取得磁盘信息 Private Declare Function GetDiskFreeSpaceEx Lib "kernel32.dll" Alias "GetDiskFreeSpaceExA" (ByVal lpDirectoryName As String, ByRef lpFreeBytesAvailableToCaller As ULARGE_INTEGER, ByRef lpTotalNumberOfBytes As ULARGE_INTEGER, ByRef lpTotalNumberOfFreeBytes As ULARGE_INTEGER) As Long

buyvm迈阿密机房VPS国内首发测评,高性能平台:AMD Ryzen 9 3900x+DDR4+NVMe+1Gbps带宽不限流量

buyvm的第四个数据中心上线了,位于美国东南沿海的迈阿密市。迈阿密的VPS依旧和buyvm其他机房的一样,KVM虚拟,Ryzen 9 3900x、DDR4、NVMe、1Gbps带宽、不限流量。目前还没有看见buyvm上架迈阿密的block storage,估计不久也会有的。 官方网站:https://my.frantech.ca/cart.php?gid=48 加密货币、信用卡、PayPal、...

创梦网络-四川一手资源高防大带宽云服务器,物理机租用,机柜资源,自建防火墙,雅安最高单机700G防护,四川联通1G大带宽8.3W/年,无视UDP攻击,免费防CC

? ? ? ?创梦网络怎么样,创梦网络公司位于四川省达州市,属于四川本地企业,资质齐全,IDC/ISP均有,从创梦网络这边租的服务器均可以****,属于一手资源,高防机柜、大带宽、高防IP业务,另外创梦网络近期还会上线四川联通大带宽,四川联通高防IP,一手整CIP段,四川电信,联通高防机柜,CN2专线相关业务。成都优化线路,机柜租用、服务器云服务器租用,适合建站做游戏,不须要在套CDN,全国访问快...

totyun:香港cn2 vps,5折优惠,$6/月,10Mbps带宽,不限流量,2G内存/2核/20g+50g

totyun,新公司,主要运作香港vps、日本vps业务,接入cn2网络,不限制流量!VPS基于KVM虚拟,采用系统盘和数据盘分离,从4G内存开始支持Windows系统...大家注意下,网络分“Premium China”、“Global”,由于站长尚未测试,所以也还不清楚情况,有喜欢吃螃蟹的尝试过不妨告诉下站长。官方网站:https://totyun.com一次性5折优惠码:X4QTYVNB3P...

large_integer为你推荐
ata考试什么是ATA认证windowsmediaWindows Media Player什么意思youtube创始人比特币创始人到底是谁youtube创始人鬼步舞创作者是谁youtube创始人卜秋静 有关生平介绍网络视频下载器谁能给我找个网络视频下载器和转换器?pps官网pps官方下载,pps播放器下载pat是什么格式怎么将自己做的PS图片保存为PAT格式?5e5e5e如何更改bootstrap navbar的颜色 03 Topics 03 Ruby Chinanetbios协议NETBEUI协议有什么用?
论坛虚拟主机 中国十大域名注册商 vir 主机 ix主机 windows2003iso php空间购买 中国电信网络测速 cxz 东莞主机托管 申请免费空间 主机返佣 免费php空间 godaddy空间 云服务是什么意思 万网服务器 谷歌搜索打不开 重庆联通服务器托管 ping值 ubuntu安装教程 更多