Mode
権限設定
文法
Recordオブジェクト.Mode
機能説明
Recordオブジェクトの権限設定
アクセス権限
| 定数 | 値 | 説明 |
|---|
| adModeUnknown | 0 | 不明 |
| adModeRead | 1 | 読み取り専用（デフォルト） |
| adModeWrite | 2 | 書き込み専用 |
| adModeReadWrite | 3 | 読み取り、書き込み可能 |
| adModeShareDenyRead | 4 | 他のユーザーによる読み取りを禁止 |
| adModeShareDenyWrite | 8 | 他のユーザーにより書き込みを禁止 |
| adModeShareExclusive | 12 | 他のユーザーの接続を禁止 |
| adModeShareDenyNone | 16 | 他のユーザーも読み取り、書き込み可能 |
使用例
<![CDATA[
<%
Dim objRd
Set objRd = Server.CreateObject("ADODB.Record")
objRd.Open "http://localehost/"
'表示
Select Case objRd.Mode
Case adModeUnknown
Response.Write "アクセス権限 : 不明" & "<br>"
Case adModeRead
Response.Write "アクセス権限 : 読み取り専用" & "<br>"
Case adModeWrite
Response.Write "アクセス権限 : 書き込み専用" & "<br>"
Case adModeReadWrite
Response.Write "アクセス権限 : 読み書き可能" & "<br>"
Case adModeShareDenyRead
Response.Write "アクセス権限 : 他ユーザーの読み取り不可" & "<br>"
Case adModeShareDenyWrite
Response.Write "アクセス権限 : 他ユーザーの書き込み不可" & "<br>"
Case adModeShareExclusive
Response.Write "アクセス権限 : 他ユーザーの接続不可" & "<br>"
Case adModeShareEnyNone
Response.Write "アクセス権限 : 他ユーザー読み書き可" & "<br>"
End Select
Set objRd = Nothing
%>
]]>
Topへ