Error 메세지 화면에 표시하기
인터넷옵션 -> HTTP 오류메시지 표시의 체크를 해지해준다.
Ad Rotator Component
광고, 배너를 쓸때 사용한다고 한다.
Set adObj = Server.CreateObject("MSWC.Adrotator")
adObj.GetAdvertisement("a/b.txt")
Browser Capabilities Component
Set objBrowser = Server.CreateObject("MSWC.BrowserType") =>Brower정보를 가져오기위해 개체 선언
objBrowser.Browser =>Brower 종류에대한 정보 가져오기
objBrowser.version =>Brower 버전에 대한 정보 가져오기
if objBrowser.ActiveXControls then... =>ActiveX지원하는지 여부 가져오기
if objBrowser.cookies then... =>cookies지원하는지 여부 가져오기
Content Linking Component
여러 asp 페이지 연결을 쉽게 할수 있는 Component.
예를 들면 추천 사이트나와 같은 곳에서 text파일에서 관리할수 있어 편리하게 사용할수 있다.
Set ConLink = Server.CreateObject("MSWC.NextLink")
linkcount = ConLink.GetListCount("conlink.txt") =>txt파일의 총 list개수를 return한다.
for i=1 to linkcount
ConLink.GetNthURL("conlink.txt",i) =>지정된 라인의 URL return
ConLink.GetNthDescription("conlink.txt",i) =>지정된 라인의 설명 return
next
*text파일을 만들때는 반드시 tab키를 사용하여 구분한다...
Data Access Component(ADO)
Dim DBCon
Set DBCon = Server.CreateObject("ADODB.Connection") =>인스턴스 만들기
DBCon.Open("DSN=Web;uid=zzugli;pwd=8513;") =>DB 연결
위줄과 같은 내용 DBCon.Open "WebDB","zzugli","8513"
DBCon.Execute "delete from member where ID = 'A'" =>쿼리를 데이터베이스에 던지기..
Dim RS
Set RS = Server.CreateObject("ADODB.RecordSet")
str = "Select * from member"
RS.Open str,DBCon
FileSystemObject
*드라이브 정보 얻어 오기
Set fs = Sever.CreateObject("Scripting.FileSystemObject")
Set Cdrive = fs.GetDrive("c:")
Cdrive.freespace =>드라이브의 잔여용량을 가져온다.
Cdrive.TotalSize =>드라이브의 전체 용량
Cdrive.VolumeName =>드라이브의 볼륨명
Cdrive.ShareName =>드라이브의 네트워크 공유이름
Cdrive.SerialNumber =>디스크 볼륨의 10진 시리얼 번호
Cdrive.RootFolder =>드라이브의 루트폴더
Cdrive.Path =>드라이브의 경로명
Cdrive.FileSystem =>드라이브의 파일 시스템
Cdrive.IsReady =>드라이브의 준비여부(true/false)
*파일정보 얻어 오기
Set fs = Server.CreateObject("Scripting.FileSysteObject")
Set myfile = fs.GetFile("c:/config.sys")
myfile.Size => 파일 크기
myfile.Type => 파일 타입
myfile.Path => 파일 경로
myfile.ShortName => 파일 이름
myfile.ShortPath => 파일 경로
myfile.ParentFolder => 파일의 상위폴더
myfile.Name => 파일 이름
myfile.Drive => 파일 위치 드라이브명
myfile.DateCreated => 파일만들어진 날짜 시간
myfile.DateLastAccessed => 마지막 액세스된 날짜 시간
myfile.DateLastModified => 마지막 수정일
*파일생성하기
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.CreateTestFile("c:ab.txt",true,false) =>전체경로,덮어쓰기여부,유니코드orASCII코드인지
objFile.FileExists("c:ab.txt") =>파일의 존재 여부 체크 존재하면true 그렇지 안으면 false
objFile.DeleteFile("c:ab.txt") =>파일 지우기
*파일에 글쓰기
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.OpenTextFile("c:ab.txt",8,true,-1)
=>전체 경로, 1이면 읽기전용 8이면 쓰기가능, true이면 없을경우 새로 생성 false이면 무조건 말일 존재,파일포맷
첫번째인자만 필수이고 나머지 생략가능 -- Set objFile = fs.OpenTextFile("c:ab.txt",8)이런식으로 많이 사용,
*파일에서 글 읽어 오기
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.OpenTextFile("c:ab.txt",1) =>글을 읽어 올때는 읽기전용(1) 값으로 반드시 셋팅한다.
Do While objFile.AtEndOfStream<>true =>AtEndOfStream은 글의 끝부분에 도달하면 ture를 return한다
Response.write objFile.readLine & "<br>" =>글은 한줄씩 읽어 온다.
loop
content = objFile.readall =>글 전체를 읽어 온다.
str = replace(content,chr(13)&chr(10),"<br>") =>replace(전체문자열,바꾸고자하는것,바꿀문자) chr(13)&chr(10)는 Enter이다
Response.write str
write =>파일에 문자열을 입력
writeLine => 파일에 문자열과 엔터값(라인)을 입력
WriteBlankLine(i) =>파일에 i개의 엔터값을 입력
Read(i) =>파일에서 i개의 문자만을 읽어온다
ReadLine =>파일에서 한라인을 읽어온다
ReadAll =>파일에서 모든 텍스트를 읽어온다
Skip(i) =>파일에서 i개 만큼 문자를 건너뛴다
SkipLine =>파일에서 읽어올때 라인하나를 건너뛴다.
* 서버에 설정되어있는 상대경로나 가상 디렉토리에 해당하는 가상경로의 물리적인 실제 위치 알기
Server.MapPath("/") => - 웹서버의 루트 디렉토리 알아내기
Server.MapPath("현재폴더/현재파일명") => - 현재페이지의 물리적인 경로
* 모든 태그에 관련된 문자들을 화면에 그대로 출력
Server.HTMLEncode("<BR>") => <BR>출력
Server.HTMLEncode("<%= Server.ScriptTimeout %>") => <%= Server.ScriptTimeout %>출력
* 호출페이지로 실행옮기기
Server.Execute("다른페이지") 또는 Server.Execute "다른페이지" =>일을 마친후 호출페이지로 되돌아옴
Server.Transfer("다른페이지") 또는 Server.Transfer "다른페이지" =>일을 마친 후 제어종료
=> Response.Redirect 와의 차이점 : 위의서버메소드는 브라우저의 url이 바퀴지 않는다 Response.Redirect 는 바뀐다.
|