装载dll文件提示“LoadLibrary失败”怎么解决？缺少dll文件怎么办？

一、出现LoadLibrary失败的原因

通常LoadLibrary失败的原因大多是代码书写不规范，编写dll文件一般不是很难，但关键是在写dll的时候代码不规范，这样在调用时就有可可能出现这样那样的问题，出现LoadLibrary失败也就不足为怪了，为了保证你使用正确的调用规范，要通知编译器使用stdcall规范和/或使用在windows.h(及相关文件)中定义的常量，如WINAPI等。通常DLL的代码如下：

01WORD WINAPI vbShiftRight(WORD nValue, WORD nBits)

02{

03return (nValue >>nBits);

04}

复制代码

WORD WINAPI vbShiftRight(WORD nValue, WORD nBits) { return (nValue >>nBits);}

下一步是与你在微软文档中读到的内容相反。你需要创建一个DEF文件。这是你防止输出函数名不出现乱字符的唯一方式(如_vbShiftRight@1)。DEF文件的形式如下：

01EXPORTS

02vbShiftRight

复制代码

EXPORTS vbShiftRight

下一步是在VB中调用这个函数，使用以下声明：

01Declare Function vbShiftRight Lib "MYDLL.DLL" (ByVal nValue As Integer,

02ByVal nBits As Integer)

03As Integer

04Sub Test()

05Dim i As Integer

06i = vbShiftRight(4, 2)

07Debug.Assert i = 1

08End Sub

复制代码

Declare Function vbShiftRight Lib "MYDLL.DLL" (ByVal nValue As Integer, ByValnBits As Integer) As Integer Sub Test() Dim i As Integer i = vbShiftRight(4,2) Debug.Assert i = 1 End Sub

如果你还想要更容易的方法从VB中调用，可以创建一个类型库。为此你需要创建和编译ODL(对象描述语言)文件。这个文件应该包含如下内容：

01module MyModule {

02[

03helpstring("Shifts the bits of an integer to the right."),

04entry("vbShiftRight")

05]

06short _stdcall vbShiftRight([in] short nValue, [in] short nBits);

07};

复制代码

module MyModule { [ helpstring("Shifts the bits of an integer to the right."),entry("vbShiftRight") ] short _stdcall vbShiftRight([in] short nValue, [in]short nBits); };

当VB加载DLL的类型库时，函数名和参数将出现在VB的对象浏览器中。此外，如果用户不输入正确的参数类型，VB将有可能产生LoadLibrary失败错误。

还有就是你最好用正确的方法调用dll，以下是我正常调用dll的函数：

01typedefvoid __declspec(dllimport) StartQueryForm(TDispatchConnection,TApplication);

02StartQueryForm* query;

03char buf[256];

04if (!GetSystemDirectory(buf,256)) {

05Application->MessageBox("读取系统目录错误","错误",MB_OK+MB_ICONERROR);

06return ;

07}

08AnsiString sCmd=AnsiString(buf)+"\\QueryEnh.dll";

复制代码

typedefvoid __declspec(dllimport)StartQueryForm(TDispatchConnection,TApplication); StartQueryForm* query;char buf[256]; if (!GetSystemDirectory(buf,256)) {Application->MessageBox("读取系统目录错误","错误",MB_OK+MB_ICONERROR); return ; }AnsiString sCmd=AnsiString(buf)+"\\QueryEnh.dll";

01HINSTANCE Package = LoadLibrary(sCmd.c_str());

02if (Package)

03{

04try {

05query = (StartQueryForm *)GetProcAddress((HINSTANCE)Package, "_StartQueryForm");

06if (query) {

07TDispatchConnection* conn=(MainForm->ConnectionWay==1 ?

08(TDispatchConnection*)MainForm->dcomConnect:

09(TDispatchConnection*)MainForm->sockConnect);

10query(conn,Application);

11}

12else {

13AnsiString str="加载函数失败，失败原因：\r";

14str+=SysErrorMessage(GetLastError());

15Application->MessageBox(str.c_str(),"错误",MB_OK+MB_ICONERROR);

16}

17}

18__finally {

19FreeLibrary(Package);

20}

21}

22else

23{

24AnsiString str="加载库失败，失败原因：\r";

25str+=SysErrorMessage(GetLastError());

26Application->MessageBox(str.c_str(),"´íÎó",MB_OK+MB_ICONERROR);

复制代码

HINSTANCE Package = LoadLibrary(sCmd.c_str()); if (Package) { try { query =(StartQueryForm)GetProcAddress((HINSTANCE)Package, "_StartQueryForm"); if(query) { TDispatchConnectionconn=(MainForm->ConnectionWay==1 ?(TDispatchConnection)MainForm->dcomConnect:(TDispatchConnection)MainForm->sockConnect); query(conn,Application); } else{ AnsiString str="加载函数失败，失败原因：\r"; str+=SysErrorMessage(GetLastError());Application->MessageBox(str.c_str(),"错误",MB_OK+MB_ICONERROR); } } __finally {FreeLibrary(Package); } } else { AnsiString str="加载库失败，失败原因：\r";str+=SysErrorMessage(GetLastError());Application->MessageBox(str.c_str(),"´íÎó",MB_OK+MB_ICONERROR);

二、出现LoadLibrary失败解决办法

方式一：采用LoadLibraryEx

若DLL不在调用方的同一目录下，可以用LoadLibrary(L“DLL绝对路径”)加载。但若调用的DLL内部又调用另外一个DLL，此时调用仍会失败。

解决办法是用LoadLibraryEx：

LoadLibraryEx("DLL绝对路径", NULL, LOAD_WITH_ALTERED_SEARCH_PATH);

通过指定LOAD_WITH_ALTERED_SEARCH_PATH，让系统DLL搜索顺序从DLL所在目录开始。

方式二：采用SetCurrentDir

跨目录调用dll，你应该这样

1、用GetCurrentDir保存当前的工作目录

2、用SetCurrentDir将当前的工作目录，设置为你的DLL所在的路径，需要使用绝对路径

3、用LoadLibrary你的DLL

4、使用SetCurrentDir恢复到原来的工作路径

缺少dll文件怎么办?

电脑系统缺少dll文件是经常的事，有时不影响使用，但会出来一个烦人的提示音-“当”。有的文件会影响系统的使用，电脑开不了机了开机后会黑屏直接提示缺少xxx.dll文件无法开机或文件损坏。那么我们一般该如何处理呢?

方法/步骤

步骤一：首先我们运用360安全工具比较广泛，可以解决我们很多问题，比如缺少文件啊，系统被串改啊，都能修复。比如缺少一个dll小文件也不例外;我们可以体检也可以选择电脑救援，如果是体检体检完后修复即可;

步骤二：如果在电脑救援中选择，那么我们点击电脑救援然后选择出现的状况如缺少的是游戏dll文件，那么我们点击选择;

步骤三：如果是电脑系统dll文件，那么我们可以在搜索框中直接查找提示缺少的dll文件名称，点击修复;

步骤四：如果在360中无法找到，我们可以手动修复，就是从网上搜索下载放到相应的目录，一般是吃c:\windows\system32文件下;也可以从别人的电脑上拷贝过来，但是系统要一样。

步骤五：还有一种是系统文件损坏无法开机了怎么办?我们可以借助系统盘，进入pe系统把文件拷贝到相应目录下即可;如果没有系统盘或u盘引导，那么我们试下安全模式可以进入不?按f8也有可能是f2或其他大家可以试试能进入安全模式，那么我们把文件手动修复即可。