항공GDS시스템들 약자

1P 월드스팬(Worldspan)
1G 갈릴레오(Galileo)
1V 아폴로(Apollo)
1J 엑세스(Axess)
1A 아마데우스(Amadeus)
1S 세이버(Sabre)
1B 아박쿠스(Abacus)

 

IP를 찾아 변수에 저장

IP확인


jsp : String REMOTE_ADDR = request.getRemoteAddr();
asp : REMOTE_ADDR = Request.ServerVariables(“REMOTE_ADDR”)
php : $REMOTE_ADDR = $_SERVER[“REMOTE_ADDR”];

Excel VBA 활용하기

vb 배운거 써먹을 때가 많네요.

vba01

Sub Select1()
    For i = 1 To 54
   
        Dim sName1 As String
        Dim sName2 As String
        
        sName1 = Trim(Sheet1.Cells(i, 2))
        
        For j = 1 To 96            
            sName2 = Trim(Sheet2.Cells(j, 1))
            '//Debug.Print sName1, sName2
            If ((sName1 = sName2) And (sName1 = sName2)) Then
               Sheet1.Cells(i, 3) = IIf(Sheet2.Cells(j, 2) > 0, Sheet2.Cells(j, 2), "")
               Sheet1.Cells(i, 4) = Sheet2.Cells(j, 3)
               Sheet1.Cells(i, 5) = IIf(Sheet2.Cells(j, 4) > 0, Sheet2.Cells(j, 4), "")
               Sheet1.Cells(i, 6) = Sheet2.Cells(j, 5)
             Exit For
            End If
        Next j
    
    Next i
End Sub

Sub Select1()
Dim price  As Integer
 
    For i = 1 To 13
   
        Dim sName1 As String
        Dim sName2 As String
        
        sName1 = Trim(Sheet1.Cells(i, 1))
        sName2 = Trim(Sheet1.Cells(i, 2))
        
        price = 0 '//초기값
        If (Trim(sName1) = "기타" And Trim(sName2) = "문자2") Then
          price = Sheet1.Cells(i, 3) + price
          Sheet1.Cells(15, 1) = price
        End If
        
     Next i
    
End Sub


샘플 3

Sub Select1()
    
    For i = 2 To 29
   
        Dim s1 As Integer
        
        Dim s2 As Integer
                
        s1 = Trim(Sheet1.Cells(i, 1))
        
        For j = 2 To 4
        
            s2 = Trim(Sheet1.Cells(i, j))
            
            If (s1 <= s2) Then
             s1 = s2
             
             Sheet1.Cells(i, 6 + j) = s2
             
            End If
            
        'Debug.Print s2
        
        Next j
        
        Sheet1.Cells(i, 6) = s1
        
        'Debug.Print s1
        
    Next i
End Sub

security – How to prevent Screen Capture in Android – Stack Overflow

Is it possible to prevent the screen recording in Android Application? I would like to develop an Android Secure Application. In that I need to detect screen recording software which are running

소스: security – How to prevent Screen Capture in Android – Stack Overflow

Remove BrowserModifier:Win32/SupTab 간단하게 제거 하기

001

프로그램 추가 삭제에서
의심스러운 프로그램 제거 (OnlineMapFinder Internet Explorer Homepage and New Tab)
002

How to Fix the “Windows Installer Service could not be accessed” Error in Windows 7

%windir%\system32\msiexec.exe /regserver

소스: How to Fix the “Windows Installer Service could not be accessed” Error in Windows 7

CAPTCHA – 위키백과, 우리 모두의 백과사전

소스: CAPTCHA – 위키백과, 우리 모두의 백과사전

http://gnujava.com/board/article_view.jsp?board_no=11&article_no=5634

http://www.findbestopensource.com/tagged/captcha?fq=Java

Receiver 4.5 for Windows – Citrix

Receiver for Windows 4.3.100 for Windows product software

소스: Receiver 4.5 for Windows – Citrix

모든 버전용 Adobe Acrobat Reader DC 설치

Download free Adobe Acrobat Reader DC software for your Windows, Mac OS and Android devices to view, print, and comment on PDF documents.

소스: 모든 버전용 Adobe Acrobat Reader DC 설치

Free PDF Converter

Primopdf01

Primopdf02

다운로드: 준비중 …

현금영수증전용카드 국세청에서 발급받기

cashcard01

cashcard03

cashcard04

cashcard05

cashcard06

cashcard07

post01

post02

cashcard021

cashcard11

cashcard12

sever2008에서 SMTP 설치하기

sever2008에서 SMTP 설치하기

2008smtp01 2008smtp02 2008smtp03

오류 코드
CDO.Message.1 오류 ‘80040220’

“SendUsing” 구성 값이 잘못되었습니다.

/ok.asp, 줄 225

IIS 7.5 에서 asp 소스 상에 Configuration 를 추가 해야 에러가 나지 않음

Set iConf = objmail.Configuration
With iConf.Fields
.item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
.item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.yoursite.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\Inetpub\mailroot\Pickup"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30
.Update
End With

 

구글 설문조사 사용하기

구글에서 제공하는 온라인 설문지로 간단하게 만들고 메일, 링크, iframe 형태로 제공할 수 있습니다.

intl00

intl01

intl02

AxBase : mdb 파일 열기

AxBase

AxBase is an Open source MDB / SQL Server Database viewer and editor. You can view & edit the tables (+ field descriptions) and execute SQL queries without Access licence. Export Tables to CSV/ XLS, Compress & Repair MDB. Compile needs Delphi + JVCL.
Next releases (available in Code) will be JCL/JVCL independant and D7 (-> 1.0.0.9 version) to XE2 (1.1 -> versions) UNICODE compatible.
New : add Styles to skin the UI.

 

다운로드 : SetupAxBase_1.1.1.0

outlook 보낸편지함에 메일 저장이 안될때

도구->옵션-> / 기본설정/전자 메일 옵션

outlook2007option

outlook2007option

Embedding a Chromium browser in an MFC application – CodeProject

소스: Embedding a Chromium browser in an MFC application – CodeProject

Valid Card Types — EAN Developer Site

EAN Hotel API documentation and resources

소스: Valid Card Types — EAN Developer Site

Complete Virtual Mail Server/SSL Certificates/ko – Gentoo Wiki

소스: Complete Virtual Mail Server/SSL Certificates/ko – Gentoo Wiki

Apache : CSR 생성 및 SSL 인증서 적용 – HanbiroSSL

소스: Apache : CSR 생성 및 SSL 인증서 적용 – HanbiroSSL

The Perfect Server – Ubuntu 14.04 (Apache2, PHP, MySQL, PureFTPD, BIND, Dovecot, ISPConfig 3) – Page 6 – Page 6

The Perfect Server – Ubuntu 14.04 (Apache2, PHP, MySQL, PureFTPD, BIND, Dovecot, ISPConfig 3) This tutorial shows how to prepare an Ubuntu 14.04 (Tru… – Page 6

소스: The Perfect Server – Ubuntu 14.04 (Apache2, PHP, MySQL, PureFTPD, BIND, Dovecot, ISPConfig 3) – Page 6 – Page 6