以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  编译器错误找不到可安装的ISAM?  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=63499)

--  作者:aaliwei91
--  发布时间:2014/4/4 11:19:15
--  编译器错误找不到可安装的ISAM?
大家好,小弟第一次用vba,测试说明书的程序,按shift+f5运行时出现错误说找不到可安装的ISAM,请问如何解决?

 Sub DataInsert()
Set adoConn=CreateObject("Adodb.Connection")
adoConn.Open"Provider=MicroSoft.Jet.OLEDB.4.0;DataSource="&Application.AppPath&"\\test.mdb"
strSqlcre="create table if00"
adoConn.Execute(strSqlcre)
strSqlalt1="alter table if00 add stockdate double"
strSqlalt2="alter table if00 add vclose double"
addConn.Execute(strSqlalt1)
addConn.Execute(strSqlalt2)
addConn.close
end sub

sub application_vbastart()
    call DataInsert()
end sub


--  作者:王锋
--  发布时间:2014/4/5 21:12:11
--  
应该是调试时找不到调试工具导致的,你在金字塔的安装目录下,找到scd10en.exe这个文件,双击安装一下,然后再重启操作系统试试