Memory Drive

[VB] Access OLEDB & Access Passworld, 암호 설정되어있을시 연결문자열

Computer_IT/VisualBasic2006. 12. 9. 20:46
반응형
    OLEDB 로 연결 (암호)
   With ConnDB
       .CursorLocation = adUseClient
       .ConnectionTimeout = 0
       .CommandTimeout = 0
       .Provider = "Microsoft.Jet.OLEDB.4.0"
       .Properties("Jet OLEDB:Database Password") = "password"  '암호
       .Open App.Path & "\sample.mdb" '디비경로
   End With


ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=True;Jet OLEDB:Database Password=password;Data Source=" & App.Path & "sample.mdb"


반응형

'Computer_IT > VisualBasic' 카테고리의 다른 글

[VB] MSN Style Notification Messages 구현소스  (1) 2006.11.08
[VB] Visual Basic 6 - IDE에서 MouseWheel 사용  (0) 2006.09.19
[VB] 키보드의 대문자만 입력  (0) 2006.09.12
[VB] Microsoft FlexGrid Control 6.0 Example  (0) 2006.09.12
[VB] 종료시 확인하기, Terminate 시 확인  (0) 2006.09.12

[VB] Visual Basic 6 - IDE에서 MouseWheel 사용

Computer_IT/VisualBasic2006. 9. 19. 10:07
반응형

http://support.microsoft.com/?id=837910  접속후 다운로드


regsvr32 "C:\Program Files\Microsoft Visual Studio\VB98\VB6IDEMouseWheelAddin.dll"   입력!





반응형

'Computer_IT > VisualBasic' 카테고리의 다른 글

[VB] Access OLEDB & Access Passworld, 암호 설정되어있을시 연결문자열  (0) 2006.12.09
[VB] MSN Style Notification Messages 구현소스  (1) 2006.11.08
[VB] 키보드의 대문자만 입력  (0) 2006.09.12
[VB] Microsoft FlexGrid Control 6.0 Example  (0) 2006.09.12
[VB] 종료시 확인하기, Terminate 시 확인  (0) 2006.09.12

[C] Long Type의 Data형을 10진수에서 2진수로..

Computer_IT/C++2006. 9. 12. 15:54
반응형
 
  1. #include <stdio.h>
  2. #include <limits.h>
  4. void main( void )
  5. {
  6.   int i;
  7.   long c;
  8.   unsigned int d;
  10.   printf(" input %ld ....  %ld : ", LONG_MIN, LONG_MAX);
  12.   scanf("%ld", &c);
  14.   d=2147483648L;
  16.   for(i=0;i<32;i++)
  17.   {
  18.    
  19.     if ( c & d )
  20.         printf("1");
  21.       else
  22.         printf("0");
  23.     d=d/2;
  24.   }
  27.   printf("\n");
  28. }
 
반응형

'Computer_IT > C++' 카테고리의 다른 글

[C] 전광판 소스...  (0) 2006.11.23
[C] printf Type Field Characters  (0) 2006.09.26
[VC] 인라인 ASM 으로 작성한 연산  (1) 2006.08.14
[VC] MMX support 여부  (0) 2006.08.14
Example Program: A Simple Query  (0) 2006.08.07

[VB] 키보드의 대문자만 입력

Computer_IT/VisualBasic2006. 9. 12. 11:07
반응형
  1. Private Sub Text1_KeyPress(KeyAscii As Integer)
  2. ' 대문자로만 입력받음
  4.     KeyAscii = Asc(UCase(Chr(KeyAscii)))
  6. End Sub
 
반응형

'Computer_IT > VisualBasic' 카테고리의 다른 글

[VB] Access OLEDB & Access Passworld, 암호 설정되어있을시 연결문자열  (0) 2006.12.09
[VB] MSN Style Notification Messages 구현소스  (1) 2006.11.08
[VB] Visual Basic 6 - IDE에서 MouseWheel 사용  (0) 2006.09.19
[VB] Microsoft FlexGrid Control 6.0 Example  (0) 2006.09.12
[VB] 종료시 확인하기, Terminate 시 확인  (0) 2006.09.12

[VB] Microsoft FlexGrid Control 6.0 Example

Computer_IT/VisualBasic2006. 9. 12. 10:39
반응형
 
  1. Option Explicit
  3. Private Sub cmdAdd_Click()
  4. Dim Rc As Integer       ' RowCount
  5. Dim Kor As Integer, Eng As Integer, Math As Integer, Tot As Integer
  6. Dim ave As Single
  8.     If Trim(txtName) = "" Then
  9.         MsgBox "이름을 입력해줄래??"
  10.         Exit Sub
  11.     End If
  12.    
  13.     Rc = FGrid1.Rows
  14.     FGrid1.Rows = Rc + 1
  15.    
  16.     ' 입력값 계산
  17.     Kor = Val(txtKor)
  18.     Eng = Val(txtEng)
  19.     Math = Val(txtMath)
  20.    
  21.     Tot = Kor + Eng + Math
  22.    
  23.     ave = Round(Tot / 3, 2) ' 반올림 소수 2째 자리
  24.    
  25.    
  26.     ' Flex Grid 에 값 넣기..
  27.     FGrid1.TextMatrix(Rc, 0) = txtName
  28.     FGrid1.TextMatrix(Rc, 1) = txtKor
  29.     FGrid1.TextMatrix(Rc, 2) = txtEng
  30.     FGrid1.TextMatrix(Rc, 3) = txtMath
  31.     FGrid1.TextMatrix(Rc, 4) = Tot
  32.     FGrid1.TextMatrix(Rc, 5) = ave
  33.    
  34.     ' 입력값 공백으로...
  35.     txtName = ""
  36.     txtKor = ""
  37.     txtEng = ""
  38.     txtMath = ""
  39.    
  40.     txtName.SetFocus
  41.    
  42. End Sub
  44. Private Sub Form_Load()
  45.     FGrid1.Rows = 1
  46. End Sub
 
반응형

'Computer_IT > VisualBasic' 카테고리의 다른 글

[VB] Access OLEDB & Access Passworld, 암호 설정되어있을시 연결문자열  (0) 2006.12.09
[VB] MSN Style Notification Messages 구현소스  (1) 2006.11.08
[VB] Visual Basic 6 - IDE에서 MouseWheel 사용  (0) 2006.09.19
[VB] 키보드의 대문자만 입력  (0) 2006.09.12
[VB] 종료시 확인하기, Terminate 시 확인  (0) 2006.09.12

[VB] 종료시 확인하기, Terminate 시 확인

Computer_IT/VisualBasic2006. 9. 12. 10:05
반응형
 
  1. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  2.     Cancel = MsgBox("정말로 창을 닫으시겠습니까?", vbOKCancel + vbDefaultButton2, "프로그램 종료중")
  3.    
  4.     If Cancel = 1 Then
  5.         End
  6.     End If
  7.    
  8. End Sub
반응형

'Computer_IT > VisualBasic' 카테고리의 다른 글

[VB] Access OLEDB & Access Passworld, 암호 설정되어있을시 연결문자열  (0) 2006.12.09
[VB] MSN Style Notification Messages 구현소스  (1) 2006.11.08
[VB] Visual Basic 6 - IDE에서 MouseWheel 사용  (0) 2006.09.19
[VB] 키보드의 대문자만 입력  (0) 2006.09.12
[VB] Microsoft FlexGrid Control 6.0 Example  (0) 2006.09.12

티스토리툴바