EditMode
カレントレコード編集状態取得
文法
Recordsetオブジェクト.EditMode
機能説明
カレントレコード編集状態取得
編集状況
| 定数 | 値 | 説明 |
|---|
| adEditNone | 0 | 未編集 |
| adEditInProgress | 1 | 編集中（未保存） |
| adEditAdd | 2 | 行追加後未保存 |
| adEditDelete | 4 | 削除 |
使用例
<![CDATA[
<%
Dim objConn, objRs
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open = "sample"
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.CursorType = adOpenDynamic
objRs.Open "select * from test"
Select Case objRs.EditMode
Case adEditNone
Response.Write "編集状況 : 未編集<br>"
Case adEditInProgress
Response.Write "編集状況 : 編集中（未保存）<br>"
Case adEditAdd
Response.Write "編集状況 : 行追加後未保存<br>"
Case adEditDelete
Response.Write "編集状況 : 削除<br>"
Case Else
Response.Write "編集状況 : その他<br>"
End Select
'オブジェクトを閉じる
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
]]>
Topへ