전체 사이트에서는 함수 코드를 구현하기 위해 하나의 데이터베이스 연결 파일만 사용하면 됩니다. 다른 말은 하지 않고 원본 코드만 직접 사용하면 됩니다.
다음과 같이 코드 코드를 복사합니다.
'==========주의====================================== =========
' 1. 웹사이트가 위치한 폴더 이름은 루트가 될 수 없습니다.
2. 웹사이트가 위치한 폴더의 이름입니다. 실제 경로에서는 폴더 이름을 반복할 수 없습니다. 예를 들어, F:/t/t 에서 t 는 웹사이트가 위치한 폴더의 이름입니다. 경우 오류가 발생합니다.
'================================================ = ============
희미한 dbPath,dbName,Db,ConnStr,WebSiteFolderName
오류 발생 시 다음 재개
WebSiteFolderName=WeldSiteBuilder
dbPath = _sitedata/ '백슬래시이며 끝에만 있다는 점에 유의하세요.
dbName = acteedata.mdb '데이터베이스 이름
Db=GetSitePhysicalPath(웹사이트폴더이름) & dbPath & dbName
'response.Write(현재 데이터베이스 물리적 경로: &server.mappath(db))
'응답.쓰기(<시간>)
'response.Write(현재 요청된 페이지 경로: &request.ServerVariables(URL))
'응답.쓰기(<시간>)
'response.Write(현재 사이트의 루트 경로: &request.ServerVariables(APPL_PHYSICAL_PATH))
'응답.쓰기(<시간>)
'response.Write(현재 사이트의 경로 상태: &request.ServerVariables(APPL_MD_PATH))
'응답.쓰기(db)
'응답.끝()
'======================
conn=Server.CreateObject(ADODB.Connection) 설정
ConnStr=공급자=Microsoft.Jet.OLEDB.4.0;데이터 소스=&Db
Conn.Open ConnStr
오류가 발생한 경우
Err.Clear
SetConn=아무것도 없음
응답.쓰기 데이터베이스 연결 오류입니다!
응답.종료
종료 조건
하위닫기콘()
연결 닫기
conn=아무것도 설정하지 않음
끝 서브
'웹사이트가 위치한 디렉터리의 절대 경로를 가져옵니다(/ 기호 사용).
함수 GetSitePhysicalPath(WSFN)
희미한 APPL_MD_PATH,APPL_MD_PATHArray,경로,WSPP
WSPP=request.ServerVariables(APPL_PHYSICAL_PATH)'기본 웹사이트는 루트 디렉터리에서 실행됩니다.
APPL_MD_PATH=request.ServerVariables(APPL_MD_PATH)
APPL_MD_PATHArray=분할(APPL_MD_PATH,/)
경로=APPL_MD_PATHArray(UBound(APPL_MD_PATHArray))
if UCase(Path)=ROOT then '웹사이트가 독립된 애플리케이션에서 실행되고 있는지 확인합니다.
'그런 다음 특정 폴더에서 웹사이트가 실행되고 있는지 확인합니다.
if InStr(WSPP,WSFN)=0 then '웹 사이트는 루트 디렉터리의 폴더에서 실행됩니다.
'방문한 페이지의 주소를 바탕으로 웹사이트가 위치한 폴더의 주소를 철자하세요.
희미한 CurrentUrl,NameArray
CurrentUrl=request.ServerVariables(URL)
NameArray=분할(CurrentUrl,/)
i=LBound(NameArray)에서 UBound(NameArray)로
UCase(NameArray(i))=UCase(WSFN)인 경우
j=0에서 i까지
WSPP=WSPP+이름 배열(j)+/
다음
종료
종료하면
다음
else '웹사이트가 루트 디렉터리에서 실행되고 있음을 나타냅니다.
'아무것도 할 필요가 없습니다. 반환 값이 초기화되었습니다.
종료하면
else '웹사이트가 가상 디렉터리에서 실행되고 있음을 나타냅니다.
'아무 것도 하지 않습니다. 반환 값이 초기화되었습니다.
종료하면
WSPP=교체(WSPP,//,/)
GetSitePhysicalPath=WSPP
기능 종료
추신: 위의 내용은 Access 데이터베이스의 잘못된 포함 경로 문제에 대한 해결책일 뿐입니다. 따라서 사이트에서 데이터베이스 연결 파일을 공유할 수 있습니다. 해당 파일이 포함되어 있으면 데이터베이스를 정상적으로 열 수 있으며 그럴 필요가 없습니다. 웹 사이트가 어떻게 실행되는지 걱정하세요(루트 디렉터리에서 실행, 가상 경로에서 실행, 루트 디렉터리 + 웹 사이트가 위치한 디렉터리에서 실행).