一个例子一部分:
Const
ADOSTR='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%S;Persist Security Info=False;Jet OLEDB
atabase Password=****1;';
procedure TWebMain.WebModuleCreate(Sender: TObject);
var
dbPath:String;
AppPath:String;
begin
dbPath:=ExtractFilePath(ParamStr(0))+'zlBase.mdb';
AppPath:=ExtractFilePath(ParamStr(0));
ADOBase.Connected:=False;
ADOBase.ConnectionString:=Format(ADOSTR,[dbPath]);
ADOBase.Connected:=True;
ppMain.HTMLFile:=AppPath+'Main.htm';
ppLogin.HTMLFile:=AppPath+'Login.html';
ppAddList.HTMLFile:=AppPath+'addlist.htm';
ppMore.HTMLFile:=AppPath+'List.htm';
ppDetail.HTMLFile:=AppPath+'Detail.htm';
ppEdit.HTMLFile:=AppPath+'editinfo.htm';
end;
之后要配置好IIS就OK了