默认声音播放设备更换程序（适用于多声卡系统）v1.4 11/08更新

gzXW · 发表于 2007-10-29 11:41

更新历史：
1.0.1 修正一个判断返回值的bug，请重新下载新版本，抱歉。
1.0.3 修正中文窗口标题识别。
1.2.0 重要改进，使用消息控制设备更改，适用所有语言的Windows。（去除使用mmsys.cpl来更改设备的方法）
      在非简体中文系统中，以英文显示。
1.3.0 10/31/2007更新，主要是增加通知栏图标，及相应切换菜单，使用更加方便。
   以带参数的快捷方式运行时，程序在更改设备后提示消息，然后延时8秒退出。如果在此之前本程序已经有一个副本在运行，则更改完设备后立即退出。
   不带参数直接运行时，程序驻留系统通知栏，在设备发生更改时显示变更消息。（在控制面板中对设备作出更改时，本程序也能接收到消息）
   通知栏图标说明：左击，显示/隐然程序主窗口；右击，显示设备列表菜单，可以直接点菜单切换设备。
1.3.2 修正两处界面显示错误。
1.3.3 重要更新：修正一处消息比较的错误。此bug会造成程序无法正确知道设备已经发生更改事件，无法显示相应的消息。
1.4.0.9 11/02加入录音设备的选择切换，气泡提示设为可选项，保存窗口位置。
         由于新版本的快捷方式对数与旧版本不一样，请重新生成桌面快捷方式。
1.4.0.25列表框中的当前默认设备改为红色显示；生成快捷方式时可以自由选择保存位置及名称；增加随Windows启动运行选项。
1.4.0.39合并一些函数过程；调整窗体界面显示效果。

1.4.0.40 当系统移走一块声卡时，windows注册表中的对应信息并不同步更新，造成本程序出错而关闭。此版本消除这个出错的bug，会提示用户重新设置一次，当用户设置当前的声卡为默认设备后，注册表中的错误信息可以得到更正而不再报错。

         MD5: 420b571b57e6f664667b6b0b77f20337  ChangeSoundDevice.exe

看来坛子上多声卡的兄弟不少。
前天按一位兄弟的要求用vbscript做了一个切换脚本，脚本有一个缺点是无法应对多个设备名称首字母相同的声卡。
现在更新一下，用VB做了类似功能的程序，可以实现精确选择声卡输出设备端口，比用vbscript做的要强。

默认声音播放设备切换程序（多声卡切换软件）
支持Windows XP/2003。

本程序为多声卡用户制作。相比传统通过控制面板更换默认播放设备的方法，本程序能为你更快捷的切换设备。
你可以利用本程序为每个设备端口生成对应的桌面快捷方式，运行此快捷方式可以直接切换至对应设备。

A program allows you to change the default sound playback device quickly.
It is very useful for users with more than one soundcard.
With this tool  you can generate a series of desktop shortcut for each sound device,  and then you run the shortcut can be directly switched to the corresponding device.
This tool supports Windows XP/2003.

自动检测设备更改：
使用菜单也可以切换：

[ 本帖最后由 gzXW 于 2007-12-12 15:41 编辑 ]

gzXW · 发表于 2007-11-8 23:32

这个是分析对照控制面板做出来的，与系统带的面板没有什么区别。
两者的更改是同步的，你可以同时打开这个软件与控制面板，随便更改其中一个，可以看到另外一个会自动收到消息去同步列表。

只看该作者 · 发表于 2007-11-8 23:15

提示: 作者被禁止或删除内容自动屏蔽

smty1111 · 发表于 2007-11-8 20:29

不错，很好用，谢谢。

owenozx · 发表于 2007-11-8 20:18

好，热心的lz！！！

gzXW · 发表于 2007-11-8 19:53

貌似没啥要更新的了，:unsure:

除了那可恶的vista:wacko:

garry · 发表于 2007-11-8 14:31

哈哈！又更新了，下了！

gzXW · 发表于 2007-11-8 13:25

有人反应界面不好看，所以改了一下，漂亮些:huh:

水影 · 发表于 2007-11-6 22:55

:loveliness: 弓虽 !! 顶上去先~B)

flz821028 · 发表于 2007-11-6 19:30

好DD，下个试试，顺便T上去:lol:

只看该作者 · 发表于 2007-11-6 15:27

提示: 作者被禁止或删除内容自动屏蔽

gzXW · 发表于 2007-11-6 15:23

小改一下，没啥新东西。
列表框中的当前默认设备改为红色显示；生成快捷方式时可以自由选择保存位置及名称；增加随Windows启动运行选项。

artu · 发表于 2007-11-4 08:07

不错不错,下来试试

garry · 发表于 2007-11-3 22:37

再次顶LZ，
热心技术人士啊！

动力音熊II · 发表于 2007-11-3 09:54

真的搞不懂，为什么还有这个东东。。。。

不是音箱接头插进去，自动切换声卡吗？
我在VISTA下，接螃蟹卡进去，听歌到一半，直接拔下来，差到X-FI上，照样听。。。控制面板里面貌似自己改了默认扬声器～ :blink:

gzXW · 发表于 2007-11-2 21:59

按建议改好了，用得上的收货:lol:

鲁爾 · 发表于 2007-11-2 01:43

不错,支持下:lol:

93blue · 发表于 2007-11-2 01:15

楼主真是个好心人:lol: :lol:

gzXW · 发表于 2007-11-2 00:45

原帖由 terryddb 于 2007-11-1 19:58 发表 ! p% I! }4 a+ G% s2 E* ^1 \: j
在VISTA下可否采用你刚开始时的VBS的方法，这样的话应该相对简单快捷一点:lol:

试了一下，用vbs可以做到。
vista的控制面板只能用方向键，没办法用字母直接选择。

试用的脚本：
change.vbs

'切换默认声卡$ p: Y E* E9 c: v2 ]
'Coded by gzXW
/ }0 h6 X. A6 o. R% q" p
Option Explicit
b- v( \5 x5 N7 I3 ~2 l; @' }
, i2 s* ?: d) I, `% Z: r5 b$ M
Dim WshShell
- a% m2 ?# R- A5 _* V a
Set WshShell = CreateObject("WScript.Shell" )
6 ~4 j" A {$ I, }, d
2 {' Q; B) B" k0 ^1 j+ `
'运行音频面板
7 W5 m3 H! V6 O7 |* A6 W
WshShell.Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0" )
4 k% j5 U+ C' d: X$ N3 M4 X l
WScript.Sleep(1500)
2 D5 m/ Q" J/ ^) ]# c u
/ ]0 N7 `/ V; Z. [
'模拟按键，第一块声卡按一次Down键。如果有更多声卡，可以多按几次Down键。/ G! ^% f) f9 Y0 X7 I( p- X u9 Z
WshShell.SendKeys("{DOWN}" ) \* l) b) X6 x
'WshShell.SendKeys("{DOWN}" )0 d7 U$ a( Q1 B8 u
+ w0 w4 X y2 S/ o/ B
WshShell.SendKeys("%s" )
/ {6 P d. O7 h0 W+ {
WshShell.SendKeys("{ENTER}" )

复制代码

gzXW · 发表于 2007-11-1 22:28

应该可以，你自己用键盘试一下，记下击键顺序，对应改.vbs。

我现在没有vista，没法试。

帐号		自动登录	找回密码
密码			注册

kween_671 该用户已被删除	69^# 发表于 2007-11-8 23:15 \| 只看该作者提示: 作者被禁止或删除内容自动屏蔽
kween_671 该用户已被删除
	回复支持反对使用道具举报显身卡

terryddb 该用户已被删除	61^# 发表于 2007-11-6 15:27 \| 只看该作者提示: 作者被禁止或删除内容自动屏蔽
terryddb 该用户已被删除
	回复支持反对使用道具举报显身卡

默认声音播放设备更换程序（适用于多声卡系统）v1.4 11/08更新

本帖子中包含更多资源

浏览过的版块