fantango4382 @ ウィキ
fantango4382 @ ウィキ

メニュー

「メニュー」の編集履歴（バックアップ）一覧に戻る

メニュー - (2015/05/22 (金) 08:15:54) の編集履歴(バックアップ)

  • [トランザクション記述]

   Dim WS As Workspace
   Dim RS_SLT As Recordset: Dim RS_EDT As Recordset
   Set db = CurrentDb
   Set WS = DBEngine.Workspaces(0)

   '** トランザクション開始
   WS.BeginTrans
   '** コミット実行
   WS.CommitTrans
   '** ロールバック実行
   WS.Rollback

  • [カレントフォルダ]
   pos = InStrRev(Application.CurrentProject.Path, "\")        '** フルバスの後ろから検索


メニュー



リンク