3초기억력

제목 : classic asp 엑셀파일 생성시 헤더 소스 : Response.ContentType = "application/x-msexcel"Response.CacheControl = "public"Response.AddHeader "Content-Disposition", "attachment;filename=파일명.xls" 내용 : 예제 소스 파일 : 출처 :

제목 : classic asp 테이블 row 중 소계, 합계, 총합계 구하는 방법(소스) 소스 : 간단 요약1. 각 pTotalCount, sTotalCount, tTotalCount, totalCount = 0 선언2. do loop 로 data 테이블 tr row write- tNo, sNo, pNo, count 에 db data 넣기(현재 값)- 이전과 비교해서 oripNo pNo 면 part 합계 tr 보여줌(row > 1 일때)- 이전과 비교해서 orisNo sNo 면 subject 합계 tr 보여줌(row > 1 일때)- 이전과 비교해서 oritNo tNo 면 test 합계 tr 보여줌(row > 1 일때)- oripNo 에 현재 pNo 저장- orisNo 에 현재 sNo 저장- oritNo ..

제목 : classic asp json send, receive 소스 : Function BytesToStr(bytes)Dim StreamSet Stream = Server.CreateObject("Adodb.Stream")Stream.Type = 1 'adTypeBinaryStream.OpenStream.Write bytesStream.Position = 0Stream.Type = 2 'adTypeTextStream.Charset = "utf-8"BytesToStr = Stream.ReadTextStream.CloseSet Stream = NothingEnd Function If Request.TotalBytes > 0 ThenDim lngBytesCount, jsonTextlngBytesCount =..

제목 : 성능 및 스타일 향상에 도움이 되는 28가지 ASP 팁 소스 : 내용 : 자주 사용되는 데이터는 웹 서버에 캐시하십시오.자주 사용되는 데이터는 응용 프로그램이나 세션 개체에 캐시하십시오.데이터 및 HTML은 웹 서버 디스크에 캐시하십시오.비 agile 구성 요소는 응용 프로그램이나 세션 개체에 캐시하지 마십시오.데이터베이스 연결은 응용 프로그램이나 세션 개체에 캐시하지 마십시오.세션 개체를 올바르게 사용하십시오.코드를 COM 개체에 캡슐화하십시오.최신의 리소스를 얻어 신속하게 릴리스하십시오.독립 프로세스 실행을 통해 성능과 안정성을 적절히 안배하십시오.Option Explicit를 사용하십시오.로컬 변수를 하위 루틴 및 함수에 사용하십시오.자주 사용되는 데이터를 스크립트 변수에 복사하십시오.배열..

제목 : classic asp 에서 업로드컴포넌트 dll 파일 생성법 및 사용법 소스 : Option Explicit Const ERR_INVALID_FILENAME = vbObjectError + 1000 Const ERR_INVALID_TARGET = vbObjectError + 1001 Const ERR_FILE_EXISTS = vbObjectError + 1002 Const ERR_UPLOAD_CALLED = vbObjectError + 1003 Const VB_ERR_PATH_NOT_FOUND = 76 Private m_objContext As ObjectContext Private m_objRequest As ASPTypeLibrary.Request Private m_strTarget As S..

제목 : asp recursive 트리 구조 소스 : "0") then children = true Response.Write("") end If If arrPages(0,x) = "" Thenphone = ""Elsephone = Left(arrPages(0,x), 3) & "****" & Right(arrPages(0,x), 4)End If If Len(arrPages(2,x)) > 2 Thenname = Left(arrPages(2,x), 1) & "*" & Mid(arrPages(2,x), 3, Len(arrPages(2,x)))Elsename = ""End If %> , "0") then Response.Write("") end if end function '배열에 담길 값'arrList == ..

제목 : 도로명, 지번, 신 우편번호 5자리 검색하기. 공공데이터 우편번호 api 사용. (ASP) 소스 : 내용 : 인증키 발급방법, 순서 1, 회원가입 : http://www.data.go.kr (공공데이터 포털) 2, 회원로그인 3, 메인 메뉴중 [오픈 API] 클릭 -> 통합검색폼에서 '우편번호' 라고 검색하면 '우편번호 정보' 라는 항목이 찾아짐. 4, [활용신청] 버튼 클릭해서 '개발계정 신청' 양식을 작성함. * 시스템유형 : 일반 * 활용목적 : 웹개발 * 기타항목 : 입렵하라는 건 다 입력해줌 5, 신청서 전송하면 실시간 승인완료 되고 인증키도 바로 발급됨 6, 마이페이지 -> OPEN API -> 개발계정 -> 검색결과 -> 인증키 확인 인증키는 인코딩된 형태로 제공됨. #상세 기능 설..

제목 : 실시간 환율 계산법. yahoo(야후) 사용법. 한국(원화) --> 중국(위안화) 계산 소스 : 내용 : http://finance.yahoo.com/webservice/v1/symbols/allcurrencies/quote 이것을 브라우저로 조회해보면 xml 형태로 쭉 나오는데, 그 중에서 USD/CNY6.520100CNY=X1456449728currency2016-02-26T01:22:08+00000 USD/KRW1235.000000KRW=X1456449730currency2016-02-26T01:22:10+00000 두개를 가져올 수 있다. 즉, USD(미국 달러) --> CNY(중국 위안화), USD(미국 달러) --> KRW(한국 원화)의 값이 나온다. 그중 price 를 보면 usd ..

제목 : 축약 URL, 단축 URL 생성 ASP function 소스 : Function getShortUrlBitly(ByVal longUrl, ByRef resultCode, ByRef resultTxt)Dim RsDim sql Dim objRoot Dim requestUrl : requestUrl = "http://api.bit.ly/v3/shorten"Dim username, apiKeyDim params Dim result : result = longUrl resultCode = "900"resultTxt = "" username = "" : apiKey = "" '//값을 넣어야함. If username "" And apiKey "" ThenSet objRoot = xmlDoc(xmlHttpS..

제목 : URL Rewrite 소스 : 내용 : IIS URL Rewrite 2.0 enables Web administrators to create powerful rules to implement URLs that are easier for users to remember and easier for search engines to find. By using rule templates, rewrite maps, .NET providers, and other functionality integrated into IIS Manager, Web administrators can easily set up rules to define URL rewriting behavior based on HTTP header..