• 用AutoHotkey修改U盘的盘符


    固定U盘盘符,电脑新增了硬盘也不用担心U盘盘符相应修改。

    我是用U盘进行文件夹同步的,所以U盘盘符不能变动。

    已打包成exe文件上传到 永硕网盘软件目录

    ;插入U盘,运行此文件
    #SingleInstance Force
    
    ;U盘旧盘符 usbOld
    usbGet := DriveGetList("REMOVABLE")
    if !strlen(usbGet)
    {
        msgbox("未检测到U盘,退出",,262144)
        ExitApp
    }
    if (strlen(usbGet) > 1) ;多个盘符(出现较少,比如做了微PE的U盘会出现此情况)
    {
        usbOld := inputbox(format("检测到多个U盘,请输入要处理的盘符(字母){1}", usbGet),,,substr(usbGet,1,1))
        if (strlen(usbOld)!=1 || !instr(usbGet, usbOld))
        {
            msgbox("输入无效,退出",,262144)
            ExitApp
        }
    }
    else
        usbOld := usbGet
    ;U盘新盘符 usbNew
    usbNew := inputbox(format("当前盘符为{1}`n请输入新盘符", usbOld),,,"U")
    if (!(usbNew ~= "[a-zA-z]") || instr(DriveGetList(), usbNew))
    {
        msgbox("新盘符输入无效或系统已占用此盘符,退出",,262144)
        ExitApp
    }
    ;写入命令到临时记事本文件
    fp := format("{1}{2}.txt", A_Desktop,A_Now)
    FileAppend(format("select volume {1}`nassign letter={2}", usbOld,usbNew), fp)
    ;执行
    RunWait(format("{1} /c diskpart /s {2}", A_ComSpec,fp))
    FileDelete(fp)
    msgbox("已完成,即将退出",,262144)
    ExitApp
  • 相关阅读:
    从sql查询结果集中查询
    tsql中with用法
    tsql 2005 ROW_NUMBER
    基于对象的C#
    逍遥游
    Creating Custom Solutions for Document Collaboration
    Word template
    Jquery :nthchild 选择用法
    .net 转换任意类型不报错
    Dom 中同级元素 选择第几个的另类方法
  • 原文地址:https://www.cnblogs.com/hyaray/p/12618287.html
Copyright © 2020-2023  润新知