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

丽萨主机122元/每季,原生IP,CN2 GIA网络

萨主机(lisahost)新上了美国cn2 gia国际精品网络 – 精品线路,支持解锁美区Netflix所有资源,HULU, DISNEY, StartZ, HBO MAX,ESPN, Amazon Prime Video等,同时支持Tiktok。套餐原价基础上加价20元可更换23段美国原生ip。支持Tiktok。成功下单后,在线充值相应差价,提交工单更换美国原生IP。!!!注意是加价20换原生I...

IMIDC日本多IP服务器$88/月起,E3-123x/16GB/512G SSD/30M带宽

IMIDC是一家香港本土运营商,商家名为彩虹数据(Rainbow Cloud),全线产品自营,自有IP网络资源等,提供的产品包括VPS主机、独立服务器、站群独立服务器等,数据中心区域包括香港、日本、台湾、美国和南非等地机房,CN2网络直连到中国大陆。目前主机商针对日本独立服务器做促销活动,而且提供/28 IPv4,国内直连带宽优惠后每月仅88美元起。JP Multiple IP Customize...

Megalayer美国独立服务器配置及性能速度综合评测

Megalayer 商家在之前也有记录过,商家开始只有提供香港站群服务器和独立服务器,后来也有增加到美国独立服务器,以及前几天也有介绍到有增加香港VPS主机。对于香港服务器之前有过评测(Megalayer香港服务器配置一览及E3-1230 8GB服务器评测记录),这里申请到一台美国独立服务器,所以也准备简单的评测记录。目前市场上我们看到很多商家提供VPS或者云服务器基本上没有什么特别的,但是独立服...

large_integer为你推荐
短信营销方案短信平台应该如何推广和运营啊?动态图片格式动态图片是什么格式?国家法规数据库在哪里可以找到比较全面的法律法规更新的信息?国家法规数据库食品及食用农产品标准法规信息支撑和综合应用平台/食品安全标准与技术法规动态比对数据库如何查询标准手机软件开发工具手机app一般用什么 软件开发方正证券官方网方正证券完美版下载za是哪个国家的IE是哪个国家的缩写ocr软件下载哪个图片转文字软件比较好用?erp系统教程如何使用ERP系统操作?彩信平台目前国内有哪些短信平台服务商,怎么排名?
网站空间免备案 新加坡虚拟主机 厦门域名注册 域名解析服务器 本网站服务器在美国维护 搬瓦工官网 rak机房 Hello图床 60g硬盘 表单样式 qq数据库 浙江独立 52测评网 东莞数据中心 新睿云 湖南idc 免费蓝钻 中国联通宽带测试 湖南铁通 hosting24 更多