《已解决》综合写了个 网吧呼叫点餐的
语音呼叫有问题 如下 - 已解决问题区 - 『 提问交流 』 -
AUTOIT CN AutoIt中文论坛|acn|au3|软件汉化 - 分享您的技术!
帖子250&精华0&积分189&威望16 点&金钱47 块&贡献32 分&阅读权限20&在线时间57 小时&注册时间&最后登录&
《已解决》综合写了个 网吧呼叫点餐的
语音呼叫有问题 如下
本帖最后由 mshuking 于
15:13 编辑
已经搞好&&哈哈
在此先感谢&&以下两人的呼叫代码
viplight(UID: 7648449)&&
yingf20(UID: 7653212)&&
谢谢viplight& &谢谢yingf20& && && && && &等此问题解决了 将服务端 客户端 免费发送。。。。
43 44 两行如何写
51-94 语音才能生效#include &GUIConstantsEx.au3&
#include &ListViewConstants.au3&
#include &StaticConstants.au3&
#include &WindowsConstants.au3&
#include &GUIConstants.au3&
#Include &Date.au3&
$Form1 = GUICreate(&点餐语音服务端&, 460, 444)
$ListView1 = GUICtrlCreateListView(&计算机|IP地址|时间|信息&, 0, 0, 458, 414)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 100);调整宽度
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 100);调整宽度
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 100);调整宽度
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 3, 100);调整宽度
GUICtrlSendMsg($ListView1, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES);设置表格边框
GUICtrlSetCursor(-1, 0);鼠标指针
$List = GUICtrlCreateContextMenu($ListView1)
$Cls = GUICtrlCreateMenuItem(&清空数据&, $List)
GUICtrlCreateMenuItem(&&, $List)
$Quit = GUICtrlCreateMenuItem(&退出&, $List)
GUISetState(@SW_SHOW)
TCPStartup(); 开始 TCP 服务
$ip = IniRead(@ScriptDir & '\configs.ini', 'Config', 'ServerIP', '192.168.0.7');从配置文件中读取IP
$port = IniRead(@ScriptDir & '\configs.ini', 'Config', 'ServerPort', '21991');从配置文件中读取端口
$tcpMainListen = TCPListen($ip, $port, 100);创建监听，用于接收数据
If $tcpMainListen = -1 Then
MsgBox(4096, '错误', '创建监听失败！')
Exit
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
& && &&&Case $GUI_EVENT_CLOSE,$Quit
& && && && && & Exit
& & Case $Cls
& && && & GUICtrlSendMsg($ListView1, $LVM_DELETEALLITEMS, 0, 0)
EndSwitch
$tcpSocket = TCPAccept($tcpMainListen);接收客户端连接
If $tcpSocket && -1 T客户端连接成功
&&While 1
& &$TcpRecvData = TCPRecv($tcpSocket, 2048, 1);接收客户端发送的数据
& &If @error Then ExitL如果接收信息出现错误，则退出循环.
& &If $TcpRecvData && '' Then
& & $TcpRecvData = GUICtrlCreateListViewItem(BinaryToString($TcpRecvData, 4), $ListView1);将信息写入到$listview1控件
;这里如何写 下面语音才生效
& && &&&_PLAYJH($Jihao)
& & ExitLoop
& &EndIf
&&WEnd
EndIf
WEnd
;=============================================================================
;语音叫号
Func _PLAYJH($Jihao)
& && &&&$JihaoHQ = StringRight($Jihao,3)
& && &&&$FenGe = StringSplit($JihaoHQ,&&)
& && &&&SoundPlay(&woman\fw.wav&)
& && &&&Sleep(2000)
& && &&&If $Jihao & 1000 And $Jihao & 99 Then
& && && && && & SoundPlay(&woman\&&$FenGe[1]&&.wav&)
& && && && && & Sleep(500)
& && && && && & SoundPlay(&woman\100.wav&)
& && && && && & If $FenGe[2] && 0 Then
& && && && && && && && &Sleep(500)
& && && && && && && && &SoundPlay(&woman\&&$FenGe[2]&&.wav&)
& && && && && && && && &Sleep(500)
& && && && && && && && &SoundPlay(&woman\10.wav&)& && &&&
& && && && && & ElseIf $FenGe[2] = 0 And $FenGe[3] && 0 Then
& && && && && && && && &Sleep(500)
& && && && && && && && &SoundPlay(&woman\&&$FenGe[2]&&.wav&)
& && && && && & EndIf
& && && && && & If $FenGe[3] && 0 Then
& && && && && && && && &Sleep(500)
& && && && && && && && &SoundPlay(&woman\&&$FenGe[3]&&.wav&)
& && && && && & EndIf
& && &&&EndIf
& && &&&If $Jihao & 100 And $Jihao & 9 Then
& && && && && & $JihaoHQ = StringRight($strepl,2)
& && && && && & $FenGe = StringSplit($JihaoHQ,&&)
& && && && && & SoundPlay(&woman\&&$FenGe[1]&&.wav&)
& && && && && & Sleep(500)
& && && && && & SoundPlay(&woman\10.wav&)
& && && && && & If $FenGe[2] && 0 Then
& && && && && && && && &Sleep(500)
& && && && && && && && &SoundPlay(&woman\&&$FenGe[2]&&.wav&)
& && && && && & EndIf
& && &&&EndIf
& && &&&If $Jihao & 10 And $Jihao & 0 Then
& && && && && & $JihaoHQ = StringRight($strepl,1)
& && && && && & SoundPlay(&woman\&&$JihaoHQ&&.wav&)
& && &&&EndIf
& && &&&Sleep(500)
& && &&&SoundPlay(&woman\hao.wav&)
& && &&&Sleep(500)
& && &&&SoundPlay(&woman\dc.wav&)
EndFunc复制代码&&If $TcpRecvData && '' Then
& && &&&;===你需要的代码如下=========================================================================
& && && && && &&&$TcpRecvData = BinaryToString($TcpRecvData, 4)
& && && && && &&&;$strepl=StringRegExpReplace($TcpRecvData, &[^\d]&, 0)
& && && && && &&&$strepl=StringRegExpReplace($TcpRecvData, &[^\d]&, 0)
& && && &;$strepl = StringSplit(BinaryToString($TcpRecvData),&|&)&&;接受到的信息以“|”符号来分割到数组
& && && && && &&&$Jihao = StringRight($strepl,3)
& && &&&;====代码结束=============================================================================
& & $TcpRecvData = GUICtrlCreateListViewItem(BinaryToString($TcpRecvData, 4), $ListView1);将信息写入到$listview1控件
& &&&;===需要播放的代码如下=========================================================================
& && && &_PLAYJH($Jihao)复制代码
附件: 您需要才可以下载或查看附件。没有帐号？
帖子250&精华0&积分189&威望16 点&金钱47 块&贡献32 分&阅读权限20&在线时间57 小时&注册时间&最后登录&
《求助 新手有难》综合写了个 网吧呼叫点餐的 语音呼叫有问题 如题
帖子706&精华0&积分439&威望37 点&金钱3033 块&贡献12 分&阅读权限30&在线时间362 小时&注册时间&最后登录&
代码不全没看出问题了，你那不是直接执行了吗... 直接执行了，就生效了啊~
帖子2343&精华0&积分2687&威望118 点&金钱24487 块&贡献1279 分&阅读权限70&在线时间1283 小时&注册时间&最后登录&
& && &_PLAYJH($Jihao) 调用这函数的参数哪里冒出来的?
这函数太多延迟,所以应该抽离出来编译成独立的EXE, 不然程序的响应肯定成问题.
帖子393&精华0&积分300&威望28 点&金钱347 块&贡献47 分&阅读权限30&在线时间118 小时&注册时间&最后登录&
你这个代码可以精简！楼上说的是 延时一定很高！
[通过 QQ、MSN 分享给朋友]赞助商链接
本类月下载排行
本类周下载排行
常用软件推荐
拾风贴吧语音回帖电脑版下载V1.0.2 最新绿色版
拾风语音回帖最新版。支持文字直接转换成为语音。调用百度翻译发音功能实现的。有兴趣的朋友可以尝试一下!
&&请点击以下链接下载该软件：&拾风贴吧语音回帖电脑版下载V1.0.2 最新绿色版
上一软件：
下一软件：
(评论内容只代表网友观点，与本站立场无关)
为了保证您快速的下载,推荐使用[] 、[] 等专业工具下载.
为确保软件能正常使用,请使用[
]解压本站软件.
目前不少软件都捆绑流氓插件，请在安装的之时务必留意每一个安装步骤.绿色先锋本身是不会捆绑任何插件在软件中的.
该软件为网上收集，若无意中侵犯了您的版权，.我们将在收信后24小时内删除侵权内
本站下载的软件中，部分软件经过压缩加密处理，解压密码为：
感谢您对绿色先锋的支持，请将网站地址放在您的博客，空间等地方，以便我们为您及您的朋友提供更好的服务.
软件按字母排列：
中文按声母搜索：2009年2月 .NET技术大版内专家分月排行榜第三
2009年2月 .NET技术大版内专家分月排行榜第三
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。热门搜索：
您的位置： -&
软件教程分类查找
非常抱歉！2345软件大全没能为您提供完善服务，万分感谢能得到您的指点！
您的建议：
精品软件课程
人气：337211
Cool Edit是一个非常出色的数字音乐编辑器
人气：598897
搜狗拼音输入法是网上最流行、功能最强大的
人气：102409
After Effects是一款图形视频处理软件,为电
人气：680076
腾讯QQ支持在线聊天、视频电话、点对点断点
小游戏推荐
怎么复制QQ语音消息
出处：百度经验
人气：6880
核心提示：我们都知道QQ的文字消息可以复制，但是语音消息却不能复制，那有没有方法解决这个问题呢？
　　我们都知道QQ的文字消息可以复制，但是语音消息却不能复制，那有没有方法解决这个问题呢？
　　首先打开QQ对话框向好友发送一条语音消息
　　1打开qq对话框，点击下面的“语言消息”按钮，录制一小段时间，点击发送按钮。
　　2例如，小编录制了一个5秒的声音发给了一个好友。在对话框中您也可以点击收听声音，看看质量如何，但是却不能复制它。
　　在电脑上找到QQ语音消息的位置
　　1打开计算机，在地址栏输入：C:UserswolfDocumentsTencent Files您的QQ号Audio按回车键进入该文件夹。
　　2进入该文件夹后，看时间标识，就会找到刚才发送的是哪条语音。
　　3之前在qq对话框发送出去的语音时间为：15:57:35，对照时间就可以找到如上图所示的语音消息。
　　复制QQ语音消息
　　右键选择该语音消息，点击复制按钮，您也可以ctrl+c键复制。然后以文件的形式保存，或者发送给其他QQ好友收听。
　　2该QQ语音文件的后缀名为：.amr可以用、、mp3打开它。
相关教程推荐
相关软件推荐
资源统计：无插件软件：96569个 无病毒软件：96872个 昨日已处理133个带插件、病毒的软件
本站总软件：96872个 软件总下载次数：22.453亿次
软件教程文章：100868篇 总浏览次数：3.231亿次}