웹브라우저 종류별 X-Y좌표 보정하기 > 온라인강의

본문 바로가기
 
 
 
오늘 584
어제 1,670
최대 2,526
전체 3,572,815

최근 방문자

1862
1835
1777
1770
1670
584
16 17 18 19 20 21
비즈니스의 시작 비즈명함 ~ 가격, 품질, 배송 3가지 만족을 드리는 비즈명함 / 즉석명함 / 급행서비스 / 서울 전지역 수도권일부 3시간배송

select * from g5_menu where me_use = '1' and me_link like '%lecture%'
온라인강좌 홈 > 온라인강좌 > 온라인강좌

ClassicASP | 웹브라우저 종류별 X-Y좌표 보정하기 (update. 2016-08-19)

페이지 정보

작성일2014-09-26 01:08 조회3,592회 댓글0건

본문

<%
'클라이언트 브라우저 환경 감지
dim strUserAgent ' 브라우저 타입
strUserAgent = UCase(cstr(request.ServerVariables("HTTP_USER_AGENT")))

dim IE
dim IE6
dim IE7
dim IE8
dim IE9
dim IE10
dim IE11
dim Opera
dim Opera5
dim ChromeSafari
dim Chrome
dim Safari
dim Firefox
dim Android
dim OtherBrowser

IE = FALSE
IE6 = FALSE
IE7 = FALSE
IE8 = FALSE
IE9 = FALSE
IE10 = FALSE
IE11 = FALSE
if InStr(strUserAgent, "MSIE 6") then
  IE = TRUE
  IE6 = TRUE
elseif InStr(strUserAgent, "MSIE 7") then
  IE = TRUE
  IE7 = TRUE
elseif InStr(strUserAgent, "MSIE 8") then
  IE = TRUE
  IE8 = TRUE
elseif InStr(strUserAgent, "MSIE 9") then
  IE = TRUE
  IE9 = TRUE
elseif InStr(strUserAgent, "MSIE 10") then
  IE = TRUE
  IE10 = TRUE
elseif InStr(strUserAgent, "v:11") then
  IE = TRUE
  IE11 = TRUE
elseif InStr(strUserAgent, "RV:11") then
  IE = TRUE
  IE11 = TRUE
end if
 
Opera = FALSE
Opera5 = FALSE
If InStr(strUserAgent, "Opera") or InStr(strUserAgent, "OPERA") then
  Opera = TRUE
end If
If InStr(strUserAgent, "Opera 5") _
or InStr(strUserAgent, "Opera/5") then
  Opera5 = TRUE
end If
 
Firefox = FALSE
If InStr(strUserAgent, "Firefox") or InStr(strUserAgent, "FIREFOX") then
  Firefox = TRUE
end If
 
Android = FALSE
If InStr(strUserAgent, "Mobile Safari") or InStr(strUserAgent, "ANDROID") then
  Android = TRUE
end If
 
Chrome = FALSE
If InStr(strUserAgent, "Chrome") then
  Chrome = TRUE
end If
 
Safari = FALSE
If InStr(strUserAgent, "Safari") or InStr(strUserAgent, "SAFARI") then
  Safari = TRUE
end If
%>

<%
' X좌표 보정하기
dim hp_xlayer
hp_xlayer = "0" ' IE11
if IE6 then
  hp_xlayer = hp_xlayer - 475
elseIf IE7 then
  hp_xlayer = hp_xlayer + 0
elseIf IE8 then
  hp_xlayer = hp_xlayer + 0
elseIf IE9 then
  hp_xlayer = hp_xlayer + 0
elseIf IE10 then
  hp_xlayer = hp_xlayer + 0
elseIf IE11 then
  hp_xlayer = hp_xlayer + 0
elseIf Chrome then
  hp_xlayer = hp_xlayer + 0
elseIf Android then
  hp_xlayer = hp_xlayer - 50
elseIf Safari then
  hp_xlayer = hp_xlayer + 0
elseif Firefox then
  hp_xlayer = hp_xlayer - 0
else
  hp_xlayer = hp_xlayer - 0
end if

response.write hp_xlayer
%>

<%
'Y좌표 보정하기
dim hp_ylayer
hp_ylayer = "15"  ' IE11
if IE6 then
  hp_ylayer = hp_ylayer + 0
elseIf IE7 then
  hp_ylayer = hp_ylayer + 0
elseIf IE8 then
  hp_ylayer = hp_ylayer + 3
elseIf IE9 then
  hp_ylayer = hp_ylayer + 3
elseIf IE10 then
  hp_ylayer = hp_ylayer + 3
elseIf IE11 then
  hp_ylayer = hp_ylayer + 0
elseIf Chrome then
  hp_ylayer = hp_ylayer - 0
elseIf Android then
  hp_ylayer = hp_ylayer - 0
elseIf Safari then
  hp_ylayer = hp_ylayer - 0
elseif Firefox then
  hp_ylayer = hp_ylayer - 0
else
  hp_ylayer = hp_ylayer
end if

response.write hp_ylayer
%>
  • 페이스북으로 보내기
  • 트위터로 보내기
  • 구글플러스로 보내기

댓글목록

등록된 댓글이 없습니다.


목록

Total 2,094건 1 페이지
온라인강의 목록
번호 제목
2094
2093
2092
2091
2090
2089
2088
2087
2086
2085
2084
2083
2082
2081
2080
2079
2078
2077
2076
2075
2074
Editor [CKEeditor] Emojione 추가하기 (write.2017-09-18) Hit.323
2073
2072
2071
ClassicASP 파일 다운로드 소스 (write.2017-09-13) Hit.420
2070
일반 무료 음악 사이트 (write.2017-09-09) Hit.484
게시물 검색
 
 
상호: 해피정닷컴 대표:정창용 사업자등록번호:119-05-36414 (08394) 서울시 구로구 디지털로 242 한화비즈메트로1차 1502호
전화: 070-7600-3500 팩스:02-865-3528 개인정보관리:정창용 mail@happyjung.com 에스크로확인
개인정보취급방침
COPYRIGHT 2001~2017 해피정닷컴. All rights reserved. 통신판매신고:2014-서울구로-0074
 
모바일 버전으로 보기