Access 97 형식 데이터베이스 만들기

Question

인터넷의 예제 코드는 대부분 access97 또는 2000 형식의 데이터베이스 중 하나를 사용합니다. 데이터베이스 작성 코드에서 Jet OLEDB : Engine Type = 4를 사용하면 데이터베이스가 액세스 97 형식 및 형식 = 5 액세스 2000 형식보다. 그러나 내가 형식 = 4 또는 심지어 시각적 데이터 관리자를 사용하여 코드를 사용하여 데이터베이스를 만들 때 서식을 만든 95 (MS 액세스 2003 열릴 때 표시된대로). 어떤 일을 할 Access 97 형식 데이터베이스를 만들려면 확인해야합니까? 도와주세요!

Answer 1

이것은 MS Access 2003에서 열지는 않습니다. 출처는 실제로 엔진 유형 4가 Access 97에 대해 정확하다는 것을 나타내는 것처럼 보입니다.

편집 : 분명히 엔진 유형 4는 Access 95/97 모두에 유효합니다. 나는 또 다른 표정을 가질 것이다.

편집 2 : 어떤 JET 버전을 사용하고 있습니까? 3.0은 Access 95 db, 3.5 (1) with 97와 연결됩니다.

Answer 2

안녕하세요.

Windows 10 + Access 2016 64 비트에서 VBScript 32 비트의 빈 액세스 97 형식 MDB 파일로 성공했습니다.

"E : \ TEST97.MDB"를 만들려면이 VBScript 32 비트를 실행하십시오 (명령 프롬프트 (Cmd.exe)에서 실행) % SystemRoot % \ SysWow64 \ cscript.exe "C : \ hoge \ MakeAC97. "E를 \ 호지 \ MakeAC97.vbs

전송 액세스 2003 형식의 MDB : VBS C"등)

언어 일반 (영어)

VBScript를 확인하려면를 입력 "\ test2000_2003.mdb

Access 1.0 - Access 2003 형식 mdb 파일

코드 샘플이 일본어 제

[http://qiita.com/Q11Q/items/1793f43a1fd4dd3f480f]

그리고 VBScript를 32 비트에서 SQL을 사용하여, 우리가 읽을 수있는 액세스 97 형식 MDB 테이블 데이터입니다 직접.

[http://qiita.com/Q11Q/items/fc06d858ee0d3c9423f4]

물론,이 제한됩니다, 그러나 액세스 2016 형식에만 적용 파일 테이블 및 선택 쿼리 및 연합 쿼리는 97 형식 MDB를 액세스하기 위해 전송합니다.

[http://qiita.com/Q11Q/items/0ada315f6b5eb9b14f8b]

 
    '%SystemRoot%\SysWow64\cscript.exe "C:\hoge\MakeAC97.vbs" 
    'Access 2013 Later 
    '64/32 Ok 
    Const DB_Lang_General = ";LANGID=0x0409;CP=1252;COUNTRY=0" 
    Const DB_LANG_JAPANESE = ";LANGID=0x0411;CP=932;COUNTRY=0" 
    Const DB_Lang_Arabic = ";LANGID=0x0401;CP=1256;COUNTRY=0" 
    Const DB_Lang_ChineseSimplified = ";LANGID=0x0804;CP=936;COUNTRY=0" 
    onst DB_Lang_ChineseTraditional = ";LANGID=0x0404;CP=950;COUNTRY=0" 
    Const DB_Lang_Cyrillic = ";LANGID=0x0419;CP=1251;COUNTRY=0" 
    Const DB_Lang_Czech = ";LANGID=0x0405;CP=1250;COUNTRY=0" 
    Const DB_Lang_Dutch = ";LANGID=0x0413;CP=1252;COUNTRY=0" 
    Const DB_Lang_Greek = ";LANGID=0x0408;CP=1253;COUNTRY=0" 
    Const DB_Lang_Hebrew = ";LANGID=0x040D;CP=1255;COUNTRY=0" 
    Const DB_Lang_Hungarian = ";LANGID=0x040E;CP=1250;COUNTRY=0" 
    Const DB_Lang_Icelandic = ";LANGID=0x040F;CP=1252;COUNTRY=0" 
    Const DB_Lang_Korean = ";LANGID=0x0412;CP=949;COUNTRY=0" 
    Const DB_Lang_Nordic = ";LANGID=0x041D;CP=1252;COUNTRY=0" 
    Const DB_Lang_NorwDan = ";LANGID=0x0406;CP=1252;COUNTRY=0" 'Norway and Dennmark 
    Const DB_Lang_Polish = ";LANGID=0x0415;CP=1250;COUNTRY=0" 
    Const DB_Lang_Slovenian = ";LANGID=0x0424;CP=1250;COUNTRY=0" 
    Const DB_Lang_Spanish = ";LANGID=0x040A;CP=1252;COUNTRY=0" 
    Const DB_Lang_SwedFin = ";LANGID=0x041D;CP=1252;COUNTRY=0" 
    Const DB_Lang_Thai = ";LANGID=0x041E;CP=874;COUNTRY=0" 
    Const DB_Lang_Turkish = ";LANGID=0x041F;CP=1254;COUNTRY=0"
 

Const DB_OPEN_DYNASET = 2 
Const DB_APPEND_ONLY = 8 
Const DRIVE_NAME = "E:\" 
Const FILE_NAME = "TEST97.mdb" 
Const oldFile = "E:\test97.mdb" 
Const NewFile = "E:\test2000_2003.mdb" 
Const cnsDbVersion30_AC95_AC97_Jet30_Jet35 = 32 
Const cnsDbVersion20_AC20_Jet20 = 16 
Const cndDBVerion10 =1 
Dim dbe : Set dbe = CreateObject("DAO.DBEngine.36") 
' MDB Start Making... 
Set dbe = CreateObject("DAO.DBEngine.36") 
Set db = dbe.CreateDatabase(DRIVE_NAME & FILE_NAME, DB_Lang_General, cnsDbVersion30_AC95_AC97_Jet30_Jet35) 
Set db = Nothing 
Set dbe = Nothing 
Call JetCompact 
End Sub 
Sub JetCompact() 
Dim JIRO : Set JIRO = CreateObject("JRO.JetEngine") 
Dim strOldConnect : strOldConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & oldFile & ";" 
Dim strNewConnect : strNewConnect ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & NewFile & ";Jet OLEDB:Engine Type =5;" 

With CreateObject("Scripting.FileSystemObject") 
    If .FileExists(oldFIle)=False then Wscript.Quit 
    If .FileExists(NewFile)=True then Wscript.Quit 
End With 
JIRO.CompactDatabase strOldConnect, strNewConnect 
Set Jiro = Nothing 
WScript.Echo "Success End" 
End Sub