今年最后一次散分，并问两个小问题

Question

圣诞节散分任务圆满完成（990分），现在是大家帮忙的时候了。两个小问题：1、如果程序中执行dos批处理文件（*.bat）
2、如何编程判断是否安装Oracle以及其版本。多谢大家捧场、赐教。

Answer 1

winexec
第二个问题我就不晓得了。接分。

Answer 2

1:WinExec('*.bat',SW_HIDE);
2:查找oci.dll是否存在。

Answer 3

First;
But, sorry, I don't know.

Answer 4

我只知道第一个问题有两种方法：
1、WinExec('*.bat',SW_HIDE);
2、你可以建立一个进程，并对他进行监控
示例：
var
  scommand:string;
  tstarinfo:TStartupInfo;
  tprocinfo:TProcessInformation;  Result:boolean;begin
scommand:='C:\Progra~1\WinRAR\winrar.exe';ZeroMemory(@tstarinfo,sizeof(tstarinfo));
tstarinfo.cb:=sizeof(tstarinfo);
ZeroMemory(@tprocinfo,sizeof(tprocinfo));tstarinfo.wShowWindow:=SW_show;
tstarinfo.dwFlags:=STARTF_USESHOWWINDOW;Result:=CreateProcess(nil,pchar(scommand),nil,nil,false,0,nil,nil,tstarinfo,tprocinfo);if not Result then
    exit;WaitForSingleObject(tprocinfo.hProcess,INFINITE);TerminateProcess(tprocinfo.hProcess,tprocinfo.hProcess);
CloseHandle( tprocinfo.hProcess );
CloseHandle( tprocinfo.hThread );

Answer 5

1.use winexec
2.搜索你的注册表在LOCAL_MACHINE/software下看是否有oracle主键

Answer 6

winexec
第二个问题我就不晓得了。接分。

Answer 7

按照 bluemeteor(挂月@渴望飞翔之驴@)  先生说的看有没有这个主键

Answer 8

winexec
搜索注册表的LOCAL_MACHINE/software

Answer 9

winexec
搜索注册表的LOCAL_MACHINE/software
楼主就这样做吧！！！

Answer 10

1.WinExec或者shellexecute
2.查找注册表，或者ORACLE的ODBC驱动

Answer 11

第一个问题：winexec
第二个不知道，帮你up