개발 Tip/Visual Basic (6) 썸네일형 리스트형 [VB] FTP 기능 담당 모듈 VB에서 특정 FTP 서버에 파일을 업로드하기 위한 모듈. wininet.dll을 사용하여 FTP 업로드기능을 구현함. Public Const BUFFERSIZE = 255 Public Const INTERNET_FLAG_PASSIVE = &H8000000 Public Const FTP_TRANSFER_TYPE_BINARY = &H2 Public Const FTP_TRANSFER_TYPE_ASCII = &H1 Public Const GENERIC_READ = &H80000000 Public Const GENERIC_WRITE = &H40000000 Public Const INTERNET_OPEN_TYPE_PRECONFIG = 0 Public Declare Function InternetConnect Li.. [VB] 비주얼베이직에서 스크롤 가능하게 설정 * 비주얼베이직에서 스크롤 가능하게 설정 비주얼베이직에서는 기본적으로 마우스 휠을 사용한 화면 스크롤 자체가 안된다. 그래서 소스가 길어서 스크롤이 생겼을 때 아래 내용을 볼려면 페이지 업/다운이나 화살표를 이용해야하는 불편함이 있다. 하지만 사람이란건 어떤 걸 사용하다가 불편을 느끼면 그걸 해소하기 위한 도구를 만드는법 ^^; 내가 만든 건 아니지만 유용한 추가기능을 하나 찾았다. : 바로 첨부파일에 있는 건데 다운로드 후 VBA Mouse Wheel Fix.reg를 실행해서 레지스트리에 등록을 한 다음 비베를 실행하여 메뉴의 추가기능 하위 메뉴인 추가기능 관리자를 선택해서 그림과 같이 설정한다. 확인을 한 다음에 마우스 휠을 돌려보면 휙~휙~ 아래 위 스크롤이 잘 된다. [VB 관련 글모음] 2008.. [VB.Net] PostgreSQL 데이터 조회하기 1. 테이블에서 데이터 조회 Dim intCount As Integer Try If DB_CONNECT() Then strCmd.Connection = gOleDBConn strCmd.CommandType = CommandType.Text strCmd.CommandText = "SELECT * FROM code" objDA.SelectCommand = strCmd objDA.Fill(objDS, "code") With objDS.Tables("code") For intCount = 0 To .Rows.Count - 1 cbRelate.Items.Add(.Rows(intCount).Item("c_code").ToString & " : " & .Rows(intCount).Item("c_value").ToSt.. [VB.Net] PostgreSQL OleDB 연결하기 1. OleDB 연결을 위한 ConnectString - "Provider=PostgreSQL OLE DB Provider;Data Source=DB서버 주소;location=DB명;User ID=아이디;password=비밀번호" 2. DB 연결 함수 Private gOleDBConn As OleDb.OleDbConnection Public objDA As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter() Public objDS As DataSet = New DataSet() Public strCmd As OleDb.OleDbCommand = New OleDb.OleDbCommand() Public Function DB_CONNECT() As Boolean .. [VB.Net] PostgreSQL 데이터 입력하기 1. 신규 데이터 입력하기 Dim intCount As Integer Try If DB_CONNECT() Then strCmd.Connection = gOleDBConn strCmd.CommandType = CommandType.Text strCmd.CommandText = "INSERT INTO person VALUES('" & cbRelate.Text.Substring(0, 2) & "', '" & txtName.Text & "', '" & txtBirthday.Text & "', '" & txtHomeAddr.Text & "', '" & txtHomeTel.Text & "', '" & txtComName.Text & "', '" & txtComAddr.Text & "', '" & txtComTel... [VB] 스캐너 제어 라이브러리 첨부파일 : 스캐너 제어 프로그램에 필요한 라이브러리. 상용라이브러리인지 Trial 버전밖에 없네. 설치하면 VB6에서 구성요소 추가로 사용이 가능하다. 설치시 데모 소스와 메뉴얼도 같이 설치가 되니 메뉴얼 참고하면서 소스 분석하면 쉽게 스캐너 제어를 할 수 있을 듯 하다. 데모 소스라 복잡하지도 않고 기본적인 기능만 있음. 출처 : http://www.ciansoft.com/twaincontrolx/default.asp 위 출처 사이트에 가보면 .Net용도 있고 다른 프로그램도 있으니 참고삼아 가볼만도 함. [VB 관련 글모음] 2008/08/12 - [프로그래밍/Visual Basic] - [VB] 비주얼베이직에서 스크롤 가능하게 설정 2008/09/08 - [프로그래밍/Visual Basic] - .. 이전 1 다음
