| |
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 액세스 버전(95,97,2000,2002): 2000
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP): winXP
3. CPU (486,PentiumI/II/III/IV...): PentiumIV
4. RAM (32,64,128,256,512MB,1G...): 512MB
* 아래줄에 질문을 작성하세요 >>
mdb를 odbc관리자에서 등록하고
다른 mdb를 열어 외부데이타가져오기로 odbc에 등록된 데이타원본을
선택하면 연결할수 없다는 메시지가 나오네요...
mdb끼리는 odbc를 통해서 가져올수 없는건가요?
odbc를 통하지 않으면 되는데
한번 가져오기 테이블을 만들어 놓으면 항상 같은 폴더에 mdb가 있어야 가져오기를 할수 있자나요?
그건 원하는게 아니거든요.
아니면 테이블 연결 테이블을 생성하는 문장을 알면 그때그때만들어 쓰면 되는데...
또는 외부데이타가져오기의 경로가 저장되는곳을 알면 그걸이용하면 되거든요
도와주세요
==============[론니님 글에 대한 답변입니다]==============
ODBC 데이터 연결은.. 조 위에 사용자 팁에 ODBC 설정방법을 읽어보시고..
아래는 제가 임시로 간혹 사용하는 코드입니다.. DAO 참조하시고..
Public Const CnnViaJet = "MS Access;DATABASE=경로및파일명"
Public Sub CrLinkedTbl(strTblName, strSrcName) '여기의 Cr은 Create임
Dim tdfLinked As DAO.TableDef
On Error Resume Next
DoCmd.RunSQL "Drop Table " & strTblName
If Err <> 3376 And Err <> 0 Then Exit Sub
On Error GoTo 0
Set tdfLinked = CurrentDb.CreateTableDef(strTblName)
tdfLinked.Connect = CnnViaJet
tdfLinked.SourceTableName = strSrcName
CurrentDb.TableDefs.Append tdfLinked
Exit Sub
End Sub
Sub MakeLinkTbl()
Dim i As Integer
Dim strTblName As String, strSrcName As String
Dim strTs() As String
strTs = Split("테이블이름,테이블이름,테이블이름", ",")
For i = 0 To UBound(strTs)
strTblName = strTs(i)
strSrcName = strTs(i)
CrLinkedTbl strTblName, strSrcName
Next
End Sub |
|
액세스에 대한 질문과
답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
