POPPUR爱换

 找回密码
 注册

QQ登录

只需一步,快速开始

手机号码,快捷登录

搜索
查看: 34498|回复: 68
打印 上一主题 下一主题

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

[复制链接]
跳转到指定楼层
#
发表于 2007-10-29 11:41 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
更新历史:
, Q5 L, x! M( Z4 m; h1.0.1   修正一个判断返回值的bug,请重新下载新版本,抱歉。& V6 n0 U5 w$ b( s/ u) X* m3 n
1.0.3   修正中文窗口标题识别。

/ Z9 ]( l: W  n* T
1.2.0   重要改进,使用消息控制设备更改,适用所有语言的Windows。(去除使用mmsys.cpl来更改设备的方法)  j- p$ j  q- @
          在非简体中文系统中,以英文显示。
1 U1 Y8 M9 w3 L: t) ~3 O+ v
1.3.0   10/31/2007更新,主要是增加通知栏图标,及相应切换菜单,使用更加方便。# U0 r+ K( a# f) q7 @' t. K
      以带参数的快捷方式运行时,程序在更改设备后提示消息,然后延时8秒退出。如果在此之前本程序已经有一个副本在运行,则更改完设备后立即退出。
" p" a6 H7 S) h$ g0 _      不带参数直接运行时,程序驻留系统通知栏,在设备发生更改时显示变更消息。(在控制面板中对设备作出更改时,本程序也能接收到消息)
, k- l" Z0 ?+ m2 h      通知栏图标说明:左击,显示/隐然程序主窗口;右击,显示设备列表菜单,可以直接点菜单切换设备。2 F8 V% z0 |" B
1.3.2   修正两处界面显示错误。
% `: C, H: S( H
1.3.3   重要更新:修正一处消息比较的错误。此bug会造成程序无法正确知道设备已经发生更改事件,无法显示相应的消息。
9 e6 \7 J) W" X2 ~" a5 B# v( |1.4.0.9 11/02加入录音设备的选择切换,气泡提示设为可选项,保存窗口位置。
3 [: |9 L$ m! I% V6 S           由于新版本的快捷方式对数与旧版本不一样,请重新生成桌面快捷方式。
  T* k4 k/ h$ P; N6 @! E
1.4.0.25列表框中的当前默认设备改为红色显示;生成快捷方式时可以自由选择保存位置及名称;增加随Windows启动运行选项。
3 v6 h; p! v5 e  i4 z1.4.0.39合并一些函数过程;调整窗体界面显示效果。4 H' x8 R3 Y9 i; j6 g3 C
  

1 }/ x0 b# L, J$ O0 ^1 s  x. D# D1.4.0.40 当系统移走一块声卡时,windows注册表中的对应信息并不同步更新,造成本程序出错而关闭。此版本消除这个出错的bug,会提示用户重新设置一次,当用户设置当前的声卡为默认设备后,注册表中的错误信息可以得到更正而不再报错。' J1 S* ?" ]3 ?" Z, z6 q
  
9 j: S" b' r& s# r            MD5: 420b571b57e6f664667b6b0b77f20337  ChangeSoundDevice.exe( W3 V$ o; J" \/ ]# e2 z9 n8 h

% }" r; N0 h+ N  w: g1 S* X) H看来坛子上多声卡的兄弟不少。1 C8 I& a# @/ a9 M; M
前天按一位兄弟的要求用vbscript做了一个切换脚本,脚本有一个缺点是无法应对多个设备名称首字母相同的声卡。
# K/ m' Z3 i  w3 @; D0 W# U现在更新一下,用VB做了类似功能的程序,可以实现精确选择声卡输出设备端口,比用vbscript做的要强。
2 O1 E2 S9 A1 s
2 I2 h6 L# b) w5 U- y' d4 Z' i默认声音播放设备切换程序(多声卡切换软件); i2 O# G0 h1 c7 y( a9 \- w
支持Windows XP/2003。
1 n5 C" h( E; N) Q6 H- Z  ]% M
/ u* n  _, T( M; C* ^本程序为多声卡用户制作。相比传统通过控制面板更换默认播放设备的方法,本程序能为你更快捷的切换设备。
+ O  T6 v" C4 t6 d你可以利用本程序为每个设备端口生成对应的桌面快捷方式,运行此快捷方式可以直接切换至对应设备。# a9 y5 C) j4 s$ ?/ B
- q" S5 U( ?8 y" [4 x% a
) m8 }: m9 i, A
A program allows you to change the default sound playback device quickly. 3 U5 i; d) g1 ~# a: v& L
It is very useful for users with more than one soundcard.
5 g, Y: X- c0 h' j& J  zWith 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., F$ J% j. @( t% v% B2 n
This tool supports Windows XP/2003.
( V' U; i- o. Z7 B+ F2 E0 A! k6 V
7 o% S/ G) |  f
# D/ N9 n' b( V6 N" N: h7 B自动检测设备更改:& M% V/ H# N( x: ?9 N
使用菜单也可以切换:
0 A8 j( x, |4 J& l% x7 U4 g2 U8 Z7 T' p" u" a- h; @6 M
[ 本帖最后由 gzXW 于 2007-12-12 15:41 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
68#
 楼主| 发表于 2007-11-8 23:32 | 只看该作者
这个是分析对照控制面板做出来的,与系统带的面板没有什么区别。8 W" j: g) D; d( Y
两者的更改是同步的,你可以同时打开这个软件与控制面板,随便更改其中一个,可以看到另外一个会自动收到消息去同步列表。
回复 支持 反对

使用道具 举报

kween_671 该用户已被删除
67#
发表于 2007-11-8 23:15 | 只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

66#
发表于 2007-11-8 20:29 | 只看该作者
不错,很好用,谢谢。
回复 支持 反对

使用道具 举报

65#
发表于 2007-11-8 20:18 | 只看该作者
好,热心的lz!!!
回复 支持 反对

使用道具 举报

64#
 楼主| 发表于 2007-11-8 19:53 | 只看该作者
貌似没啥要更新的了,:unsure:  5 ?$ q  i+ _3 \! }" A& @

* \$ S5 r" T" J9 @) H% j除了那可恶的vista:wacko:
回复 支持 反对

使用道具 举报

63#
发表于 2007-11-8 14:31 | 只看该作者
哈哈!又更新了,下了!
回复 支持 反对

使用道具 举报

62#
 楼主| 发表于 2007-11-8 13:25 | 只看该作者
有人反应界面不好看, 所以改了一下,漂亮些:huh:
回复 支持 反对

使用道具 举报

61#
发表于 2007-11-6 22:55 | 只看该作者
:loveliness: 弓虽 !! 顶上去先~B)
回复 支持 反对

使用道具 举报

60#
发表于 2007-11-6 19:30 | 只看该作者
好DD,下个试试,顺便T上去:lol:
回复 支持 反对

使用道具 举报

terryddb 该用户已被删除
59#
发表于 2007-11-6 15:27 | 只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

58#
 楼主| 发表于 2007-11-6 15:23 | 只看该作者
小改一下,没啥新东西。
" [0 h0 ^$ T8 |/ V* T) r0 V列表框中的当前默认设备改为红色显示;生成快捷方式时可以自由选择保存位置及名称;增加随Windows启动运行选项。
回复 支持 反对

使用道具 举报

57#
发表于 2007-11-4 08:07 | 只看该作者
不错不错,下来试试
回复 支持 反对

使用道具 举报

56#
发表于 2007-11-3 22:37 | 只看该作者
再次顶LZ,
) t' j, W* o! d5 @热心技术人士啊!
回复 支持 反对

使用道具 举报

55#
发表于 2007-11-3 09:54 | 只看该作者
真的搞不懂,为什么还有这个东东。。。。. ]* c: x5 s8 `, C

, e! H( k5 h; u不是音箱接头插进去,自动切换声卡吗?3 N- [0 B! W; x3 J! p  b* u
我在VISTA下,接螃蟹卡进去,听歌到一半,直接拔下来,差到X-FI上,照样听。。。控制面板里面貌似自己改了默认扬声器~ :blink:
回复 支持 反对

使用道具 举报

54#
 楼主| 发表于 2007-11-2 21:59 | 只看该作者
按建议改好了,用得上的收货:lol:
回复 支持 反对

使用道具 举报

53#
发表于 2007-11-2 01:43 | 只看该作者
不错,支持下:lol:
回复 支持 反对

使用道具 举报

52#
发表于 2007-11-2 01:15 | 只看该作者
楼主真是个好心人:lol: :lol:
回复 支持 反对

使用道具 举报

51#
 楼主| 发表于 2007-11-2 00:45 | 只看该作者
原帖由 terryddb 于 2007-11-1 19:58 发表 ! _- q' M4 }; m. H# v8 _
在VISTA下可否采用你刚开始时的VBS的方法,这样的话应该相对简单快捷一点:lol:

. c5 h" M5 Z+ [  H
7 {' z! Z$ Z9 [. f4 U7 ~4 p* F5 U! l
试了一下,用vbs可以做到。$ h& z3 I! g- T3 t" x- \
vista的控制面板只能用方向键,没办法用字母直接选择。5 J6 V( g7 ]5 W2 X
9 @( _1 `1 B& w1 ?' V$ N
试用的脚本:- s! w% c9 z. v1 V4 k* Y; e7 n
change.vbs4 g. P  ?& U) r
  1. '切换默认声卡! Q+ d( f0 g2 _/ I0 j
  2. 'Coded by gzXW5 q: R: t' f: [; t; k
  3. Option Explicit5 y0 h- \( N8 g- _$ p. s7 [

  4. / I+ H; t3 T/ @. n- k( A. m) G/ B$ c
  5. Dim WshShell
    , w. M6 Z; i4 I
  6. Set WshShell = CreateObject("WScript.Shell" )
    ( x% U2 O; h) c" Z7 N% ^# H: m' P

  7. : V; U7 p) m6 Z# V" U" {( d
  8. '运行音频面板( \9 f( q0 t( B/ t) x' @
  9. WshShell.Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0" )
    7 T" \5 x0 V! h3 B: }! _
  10. WScript.Sleep(1500)$ o) P5 Y/ K6 x: \) Q( E5 b7 m
  11. ! j3 i9 E" h& [6 Y0 ^9 i' V7 ^# {% ~$ m% m
  12. '模拟按键,第一块声卡按一次Down键。如果有更多声卡,可以多按几次Down键。
    * {, Y) S  O) ~$ [% D
  13. WshShell.SendKeys("{DOWN}" )
    : b3 ^  f2 k; W3 O0 h: E
  14. 'WshShell.SendKeys("{DOWN}" )
    . w9 W' e' b7 h) b

  15. / \2 R4 {8 R5 n5 m- j$ N' p# @1 ]8 j
  16. WshShell.SendKeys("%s" ). O7 c: e. Z3 o: n! h/ D& s
  17. WshShell.SendKeys("{ENTER}" )
复制代码
回复 支持 反对

使用道具 举报

50#
 楼主| 发表于 2007-11-1 22:28 | 只看该作者
应该可以,你自己用键盘试一下,记下击键顺序,对应改.vbs。7 ^7 i; T- x* b  u
& L5 ^* y" Z/ y; c) J' `6 r
我现在没有vista,没法试。
回复 支持 反对

使用道具 举报

terryddb 该用户已被删除
49#
发表于 2007-11-1 19:58 | 只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

广告投放或合作|网站地图|处罚通告|

GMT+8, 2026-6-16 01:52

Powered by Discuz! X3.4

© 2001-2017 POPPUR.

快速回复 返回顶部 返回列表