データベースに保存されているプロジェクトを削除します。
構文
expression。
DeleteFromDatabase( _Name_, _UserID_, _DatabasePassWord_, _FormatID_ )
expressionApplication オブジェクトを 表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| 名前 | 省略可能 | String | 開くソース ファイルまたはデータ ソースの名前、およびデータベースから削除するプロジェクトの名前を指定します。 |
| UserID | 省略可能 | String | データベースにアクセスするときに使用するユーザー ID を指定します。 |
| DatabasePassWord | 省略可能 | String | データベースにアクセスするときに使用するパスワードを指定します。 |
| FormatID | 省略可能 | String | ファイルまたはデータベース形式です。 プロジェクトには、Name で指定したファイルの形式が認識している場合は、FormatID が無視されます。 次の書式指定文字列のいずれかできます。 |
| 文字列 | 説明 |
|---|---|
| "MSProject.mpd" | Project データベース |
| "MSProject.odbc" | ODBC データベース |
| "MSProject.mdb" | Microsoft Access データベース |
戻り値
ブール型 (Boolean)
注釈
Name 引数には、ファイル名文字列、ODBC データ ソース名 (DSN)、プロジェクト名の文字列を含める必要があります。 データ ソースの構文は <DataSourceName>\ Projectname です。 より小さい (<) 記号とより大きい記号 (>) を含める必要があり、データ ソース名とプロジェクト名を円記号 (\) で区切る必要があります。 DataSourceName 自体には、コンピューターにインストールされている ODBC データ ソース名、ファイル DSN、またはファイル ベース データベースのパスとファイル名のいずれかを指定できます。
次の例では、[My Documents] が My Documents フォルダーの完全なパスであり、[Program Files] は Program Files フォルダーの完全なパスです。
"<Corporate SQL Database>\Factory Construction"
"< _[マイ ドキュメント]_ PROJECT1。MDB>\System Roll-out Plan"
"<[Program Files] \Common Files\ODBC\Data Sources\Projects Database.dsn>\Project X"
例
次の使用例は、Project データベースから、ユーザーの指定したプロジェクトを削除します。
Sub KillProjects()
Dim PathAndDB As String, ProjectName As String
Dim Continue As Long ' Used to store user response
Continue = vbYes ' Set to Yes so that loop runs
PathAndDB = InputBox$("Enter the path and file name of the Project" & _
" database to open, including extension: ")
Do Until Continue = vbNo
ProjectName = InputBox$("Enter the name of the project to delete: ")
DeleteFromDatabase "<" & PathAndDB & ">\" & ProjectName, _
FormatID:="MSProject.mpd"
Continue = MsgBox("Project " & ProjectName & " deleted from database." & _
vbCrLf & vbCrLf & "Delete another?", vbYesNo)
Loop
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。