エラー:3420 オブジェクトが正しくないか、現在設定されていません。 となる。
対処方法が解らんのでサポートへ。32bitは問題ない。
お返事きました。直さないといけないリストに載ってるそうです。SP1予定って感じ。修正スケジュールは未定。予定は未定。
実装したい場合は、ADOやらDAOでフィールドを削除して追加して更新。要は使わなきゃいい。
Option Compare Database
Option Explicit
Sub test()
On Error GoTo ErrHnd
Dim db As Database
Set db = CurrentDb
db.Execute "CREATE TABLE test01 (ID AUTOINCREMENT PRIMARY KEY, f01 char(20), f02 char(30))"
'64bitはALTER COLUMNに問題あり
db.Execute "ALTER TABLE test01 ALTER COLUMN f01 char(30)"
db.Execute "ALTER TABLE test01 ALTER COLUMN f01 memo"
Done:
db.Execute "DROP TABLE test01"
Set db = Nothing
Exit Sub
ErrHnd:
MsgBox Err.Number & vbCrLf & Err.Description
Resume Next
End Sub
3 件のコメント:
Microsoft Office 2010 Service Pack 1 (SP1)
の一覧にこちらの修正記載がなかったようですが
実際も修正されていないのでしょうか?
会社PCが64bitで自由にインストール出来る環境でない為、確認ができず質問させていただいています。
ちぃーっす。
この件は、2011/04のHotfixな件なので、SP1に含まれています。
5/2のブログも確認しました。
ありがとうございました!!!
コメントを投稿