過去ログ

                                Page     474
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼別mdbのtableのdeleteができません  青山倶楽部員 04/1/3(土) 1:31
   ┗Re:DROP ステートメント  YU-TANG 04/1/3(土) 2:10
      ┗Re:DROP ステートメント  青山倶楽部員 04/1/3(土) 8:37

 ───────────────────────────────────────
 ■題名 : 別mdbのtableのdeleteができません
 ■名前 : 青山倶楽部員
 ■日付 : 04/1/3(土) 1:31
 -------------------------------------------------------------------------
   vbaの勉強を始めたばかりで、良くわからず困っています。
是非、ご教授頂きたく、お願いいたします。
(質問)
別mdbにデータを作成するに当たり、
tableをdelete後、createとしたいのですが、
deleteができません。
非常に困っています。
(うまくいかないコード)
(start)
'別データベースのデータを開きます
  cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
       "D:\tec3000db.mdb"
'tableを削除後、クリエイトしたいのですが、deleteがうまくいきません。
  On Error Resume Next
  DoCmd.DeleteObject acTable, "xxxx"
  On Error GoTo 0
  cnn.Execute "CREATE TABLE xxxx (" & _
         "項目1 LONG," & _
         "項目2 DATE," & _
         "項目3 LONG" & ")"
(end)
以上、よろくお願いいたします。

 ───────────────────────────────────────  ■題名 : Re:DROP ステートメント  ■名前 : YU-TANG  ■日付 : 04/1/3(土) 2:10  ■Web : http://www.f3.dion.ne.jp/~element/msaccess/  -------------------------------------------------------------------------
   >   DoCmd.DeleteObject acTable, "xxxx"

cnn.Execute "DROP TABLE xxxx;"

 ───────────────────────────────────────  ■題名 : Re:DROP ステートメント  ■名前 : 青山倶楽部員  ■日付 : 04/1/3(土) 8:37  -------------------------------------------------------------------------
   ▼YU-TANG さん:
>>   DoCmd.DeleteObject acTable, "xxxx"
>
>cnn.Execute "DROP TABLE xxxx;"

うまくいきました。
休み中に、プログラムが完成できそうです。
早々の回答に深謝。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 474