编程论坛 » VB6论坛 » 这个要怎么处理

菜鸟VB 发表于 2008-6-18 14:37

这个要怎么处理

今天做了个软件在我的机子就能正常运行
可在其他机子上运行就出现这个提示
[attach]35571[/attach]
是什么原因呢
改怎么解决？

[[it] 本帖最后由 菜鸟VB 于 2008-6-18 15:26 编辑 [/it]]

三断笛 发表于 2008-6-18 19:37

你要注册控件  mswinsck.ocx,在system32里边  去注册一下吧

jxyga111 发表于 2008-6-18 19:44

我记得好像C盘里有一个系统文件夹的自己找找看

tig2 发表于 2008-6-19 02:43

注册控件就可以了！

菜鸟VB 发表于 2008-7-13 20:12

怎么注册呀 ？？？

水中无月 发表于 2008-7-13 20:16

运行->
regsvr32.exe 控件名

菜鸟VB 发表于 2008-7-13 20:38

有自动注册的吗？当程序运行的时候.我发现在其他的机子上就会出现这个提示的。。。

multiple1902 发表于 2008-7-13 21:12

生成的exe在当前目录下遇到这个文件似乎能自动处理，但貌似目标机器里没找到这玩意，没法注册呀

水中无月 发表于 2008-7-13 21:18

这里有个VC代码：
typedef    LRESULT    (* DllRegisterServerProc)(void);   
BOOL    CRegdllDlg::TestRegCom(CString    dllFileName)   
   {   
   BOOL    retVal    =    FALSE;   
   HINSTANCE    hDll    =    LoadLibrary(dllFileName);  
   do    {   
   if(hDll    ==    NULL)   
   {   
   break;   
   }   
   DllRegisterServerProc    DllRegisterServer;   
   DllRegisterServer    =    (DllRegisterServerProc)    GetProcAddress(hDll,    "DllRegisterServer");  //这个是重点
   if(DllRegisterServer    ==    NULL)   
   {   
   break;   
   }   
   int    temp    =    DllRegisterServer();   
   if(temp    !=    S_OK)   
   {   
   break;   
   }   
   retVal    =    TRUE;   
   }    while(false);   
   if(retVal    ==    FALSE)   
   {   
// MessageBox(   "缺少组件",    "错误",    MB_OK    |    MB_ICONERROR);   
   //ShellExecute(NULL,    "open",   0",    NULL,    NULL,    SW_SHOW);   
   }
   FreeLibrary(hDll);   
   return    retVal;   
   }

菜鸟VB 发表于 2008-7-13 21:42

有没有VB代码呀 老大。。。

查看完整版本: 这个要怎么处理