• 开机自动播放音乐的vbs


    今天无意间看到了vbs这小玩意,就突发奇想,自学了一下,倒弄出如下的小玩意,大牛勿喷!这个可用做撩妹神技也可以用于提醒自己!
    使用方法:复制程序到txt文本里面保存,然后改后缀为vbs,丢到C:ProgramDataMicrosoftWindowsStart MenuProgramsStartUp便可开机自启!
    红色的为歌曲路径,这个要设置对,绿色的看心情修改,感觉好用的热心一下,别浪费了!



    程序1:
    CreateObject("SAPI.SpVoice").Speak "博客园" '语音播报,可输入任意文字
    msgbox "博客园" '跳弹窗提示,可输入任意文字,确认关闭后继续执行下面语句
    set w = createobject("wmplayer.ocx")
    w.url = "D:曾经的你.mp3" ' 请在双引号中输入音乐文件的路径
    for i=0 to 1 '次数
    wsh.sleep 3000 '单位毫秒
    do until w.playstate = 1 ' 播放1次后结束循环,数字为负数时无限循环,until的作用是直到满足条件跳出循环
    wscript.sleep 500 '暂停500毫秒
    loop
    next
    '要想开机就能运行你需要把这个VBS文件,放在这个路径下即可C:ProgramDataMicrosoftWindowsStart MenuProgramsStartUp



    程序2:
    CreateObject("SAPI.SpVoice").Speak "my love" '输入任意英文
    set ws=createobject("wscript.shell")
    ws.run "wmplayer.exe D:曾经的你.mp3",0 '歌曲路径
    '要想开机就能运行你需要把这个VBS文件,放在这个路径下即可C:ProgramDataMicrosoftWindowsStart MenuProgramsStartUp

  • 相关阅读:
    今天又能去健身了
    今天招受情感打击
    js实现菜单命令
    爱好者
    杂七杂八
    wu
    后缀数组学习笔记——罗穗骞倍增算法代码
    POJ 3261 Milk Patterns
    URAL 1158 Censored!
    POJ 1743 Musical Theme
  • 原文地址:https://www.cnblogs.com/lifi/p/6262819.html
Copyright © 2020-2023  润新知