如何取得isapi当前*.dll所在的路径？ (100分)

H

harmer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-23

• #1

 

飞

飞龙在天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-23

• #2

用Win32 API函数GetModuleFileName

function GetDLLPath: string;
var
Buf: array [1..256] of Char;
iLen: Integer;
begin
iLen := GetModuleFileName(HINSTANCE, @Buf, SizeOf(Buf));
Result := ExtractFilePath(Copy(string(Buf), 1, iLen));
end;

 

H

harmer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-23

• #3

这样取得的是c:/...

而我需要的应该是http://localhost/....这样的。

 

飞

飞龙在天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-23

• #4

那更简单了，用Request.URL即可。

 

姚

姚哥

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-23

• #5

function ReadDLLPath : String;
var
DLLPath : String;
FN: array[0..MAX_PATH- 1] of char;
begin
SetString(DLLPath, FN, GetModuleFileName(hInstance, FN, SizeOf(FN)));
DLLPath := ExtractFileDir(DLLPath);
if Copy(DLLPath,Length(DLlPath),1) <> '/' then
DLLPath := DLLPath+'/';
Result := DLLPath;
end;

 

D

dana

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-01

• #6

帮忙提前！！！

 

H

harmer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-05

• #7

接受答案了.

 

飞

飞龙在天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-05

• #8

奇怪，为什么得分的是dana？