2015년 1월 26일 월요일

[액세스VBA] 레코드 갯수(record count)

Private Sub Command1_Click()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
 
    Dim rsCount As Integer
    Dim queryNameOrSQL As String
 
    queryNameOrSQL = "select * from excel"
 
    Set db = CurrentDb
    Set rs = db.OpenRecordset(queryNameOrSQL)
    rs.MoveLast
 
    rsCount = rs.recordCount

    Text1.Value = rsCount
End Sub



* excel : 테이블 이름(table name)

2015년 1월 19일 월요일

[엑셀함수]특정 문자 지우기

=SUBSTITUTE(A1,"특정","")

[엑셀VBA]마지막행 구하기

Lastrow = Sheet1.Range("A65536").End(xlUp).Row + 1





Sub LastRowInOneColumn()
'Find the last used row in a Column: column A in this example
    Dim LastRow As Long
    With ActiveSheet
        LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
    End With
    MsgBox LastRow
End Sub

Sub LastColumnInOneRow()
'Find the last used column in a Row: row 1 in this example
    Dim LastCol As Integer
    With ActiveSheet
        LastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
    End With
    MsgBox LastCol
End Sub

2015년 1월 15일 목요일

[MSSQL]레코드 생성일자 추가

"레코드생성일자" DATETIME NOT NULL DEFAULT 'getdate()',
"레코드수정일자" DATETIME NOT NULL DEFAULT '' ON UPDATE CURRENT_TIMESTAMP,

ALTER TABLE stock ADD "레코드생성일자2" DATETIME NOT NULL DEFAULT 'GETDATE()';

ALTER TABLE stock ADD CONSTRAINT DF_YourTable DEFAULT GETDATE() FOR YourColumn

ALTER TABLE dbo.MyTable ADD CONSTRAINT my_Con DEFAULT GETDATE() for created UPDATE MyTable SET Created = GetDate() where Created IS NULL ALTER TABLE dbo.MyTable ALTER COLUMN Created DATETIME NOT NULL

2015년 1월 10일 토요일

[번외:해외직구스마트폰]How To Buy

주의사항
1. 언락여부
2. 국내 주파수 지원
3. 한국어 지원 여부

국내 이통사 4G LTE 주파수 할당
- SKT: Band3 (1800MHz), Band5 (850MHz)
- KT: Band3 (1800MHz), Band8 (900MHz)
- LGU+: Band1 (2100MHz), Band5 (850MHz), Band7 (2600MHz)

Network: 4G: FDD-LTE 800/900/1800/2100/2600 MHz

해외쇼핑몰 검색어 : unlocked smartphone lte [사용하는 이통사 주파수] <--- KT면 900, 1800

2015년 1월 6일 화요일

2014년 12월 10일 수요일

[MSSQL]SQL Server 2008 R2 EXPRESS 설치 후 외부접속 안될때

MSSQL 2008 R2 EXPRESS 설치 후 외부에서 접속시도를 했는데 안될때...


체크해 봐야 할 사항들


1. SQL Server 구성 관리자


시작 > 모든 프로그램 > Microsoft SQL Server 2008 R2 > 구성 도구 > SQL Server 구성 관리자
를 실행시키면 왼쪽 탭부분에 SQL Server 네트워크 구성 이라는 부분이 있을 것이다.
그 목록을 확장 시키면 하위 항목을 클릭해 보면
오른쪽 탭에 프로토콜 이름과 상태가 나올텐데
TCP/IP 의 상태가 사용 안 함 으로 되어있을 것이다.
그것을 오른쪽 클릭하여 사용으로 하고
더블클릭 하면 나오는 다이얼로그창에 IP주소 탭을 보면 IP1, IP2 등등 IPn 으로 쓰여진 항목들과 IPAll 에
입맛에 맞게 설정하면 된다.
잘 모르겠다면 TCP 포트는 기본 포트인 1433
활성은 예 로 설정하자
물론 보안상 좋지 않지만 연습중이라면 일단 이렇게 설정해놓고 외부접속이 되게한 다음
나중에 천천히 공부해 보라.


2. 컴퓨터이름


내컴퓨터 > 속성 > 컴퓨터이름 을 살펴보자.
이때 내 컴퓨터 이름에 한글이 섞여있다면 안될 가능성도 있다.
이부분은 자세히 확인은 안해보았지만... 찜찜하니 내 컴퓨터 이름을 영문으로 바꿔주자.




3. 윈도우 방화벽


Windows7 일 경우 제어판 > 시스템 및 보안
WindowsXP 일 경우 제어판 > 네트워크 및 인터넷 연결
을 살펴보면 Windows 방화벽 항목이 있는데
그곳에 규칙을 추가해 주자.
아마 디폴트로 설치했으면 아래와 같은 위치에
C:\Program Files\Microsoft SQL Server\MSSQL10_50.MSSQLSERVER\MSSQL\Binn <- 이곳
sqlservr 이라는 응용프로그램이 있을텐데
이 녀석을 예외규칙 혹은 인바운드규칙에 넣어주자






이렇게 했는데도 안된다...


그럼 혹시 모를 접속하려는 클라이언트 PC에서 셋팅을 확인도 한번 해보자.
위에 얘기한 SQL Server 구성 관리자 를 보면
SQL Native Client 10.0 구성
항목이 있는데 그걸 클릭해보면 오른쪽 탭에 이름, 순서, 사용 이 보일것이다.
그중에 TCP/IP 가 사용 으로 되어 있는지 보고
역시나 더블클릭해서 포트가 1433 으로 되어있는지 확인해보자.