关于Error: 变量类型必须为对象类型("Object")
刚才在网上搜索了下,说是因为系统被优化过的原因,所以有的电脑不能打开我的软件请问高手们有谁知道到底是缺少了哪些文件呢?
是根据贴子http://autoitx.com/forum.php?mod=viewthread&tid=8182&highlight=%B6%C1改写的
$objVoice = ObjCreate("SAPI.SpVoice")
$objVoice.Voice = $objVoice.GetVoices("Name=Microsoft Simplified Chinese").Item(0)
$objVoice.rate =1;'速度:0-10
$objVoice.Volume=100 ;'声音:0-100
$objVoice.Speak('你现在使用的计算机名是'&_hhh(@ComputerName))
$objVoice.Speak('IP是'&_hhh(@IPAddress1))
Func _hhh($txt)
Local $wn
$b=StringLen($txt)
For $a=1 To $b
$wn=$wn&' '&StringMid ($txt, $a, 1)
Next
Return $wn
EndFunc
另外里面需要调用的微软TTS5.1语音引擎(中文)也已经安装了,可是就是读不了,软件本身并没有问题,因为在部分电脑可以测试成功。
出错截图: 833行是什么 回复 2# netegg
$objVoice = ObjCreate("SAPI.SpVoice") 不放到桌面能不能正常执行呢? $oShell = ObjCreate("SAPI.SpVoice")
if not IsObj($oShell) then
Msgbox(0,"错误","$oShell 不是一个对象.")
else
Msgbox(0,"成功","成功创建对象 $oShell.")
endif
把系统服务恢复为默认?试试?
要是不行,就全注册系统DLL及OCX试试?
再不行,个人认为做下系统?
页:
[1]