出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
Provider エラー 80020005 　 himekaさん [2004/09/03 14:01:31] [4617]
　 Re:Provider エラー 80020005 　 暇人さん [2004/09/06 14:25:03] [4618]
　 　 Re:Provider エラー 80020005 　 himekaさん [2004/09/10 10:56:05] [4621]
[4617] Provider エラー 80020005
投稿者：himekaさん 2004/09/03 14:01:31
こんにちは。
以下のコードを実行中に

Provider エラー 80020005
種類が一致しません。

が発生し、調べてみましたが事例や解説が発見できません。
エラーについて、どなたかご存知のかたいらっしゃれば教えていただけないでしょうか？よろしくお願いします。

環境はサーバがWin2003、IIS6.0、SQL Server2000
クライアントがWinXPです

---------------------------------------------------
set xcn = ad_cn()
set xrs = ad_rs()

'On Error Resume next
xcn.open strConnect
xcn.Execute "USE " & request.Form("dbName")
xrs.open "CreateTable_header", xcn, adopenstatic,　adLockOptimistic, adCmdTable

if xrs.EOF then
　tmpHead = 0
else
　tmpHead = extSQLMax("CreateTable_Header", "headID", strConnect)
End if

xcn.Errors.Clear
xrs.Addnew

xrs("headID").value = tmpHead
xrs("dbName").value = request.Form("dbName")
xrs("tbName").value = request.Form("tbName")
xrs("ownName").value = request.Form("ownName")

if errflg = false And xcn.Errors.count = 0 then
　xrs.Update
　If xcn.Errors.Count > 0 then
　　errflg = true
　　For each err in xcn.errors
　　　errmsg = errmsg & err.Description & vbCrLf
　　Next
　End If
Else
　xrs.cancel
　errflg = true
end if
xrs.close
xcn.close
'On Error Goto 0


[4618] Re:Provider エラー 80020005
投稿者：暇人さん 2004/09/06 14:25:03
こんにちは　暇人です。

>Provider エラー 80020005
>種類が一致しません。

そのまんまかと思います
ad_cn()
ad_rs()
の両関数のソースを見てみてください
プロバイダの種類が正しくないと言われているかと思います

それとadopenstatic等、ロックとカーソルを指定していますが。
これは変数もしくは定数で数値を渡してますでしょうか？
多分渡しているとは思いますが。念のため一応確認してみました。

エラーが出た行が表示されているはずですが、ソースのどこに該当するのでしょうか？
これは重要なので質問なさる際に書いておいた方がいいです。
[4621] Re:Provider エラー 80020005
投稿者：himekaさん 2004/09/10 10:56:05
お返事ありがとうございます。

ちなみに、エラーの発生箇所は
rs.Addnewのようなんですが・・・。
エラー箇所は次回から気をつけます。

> ad_cn()
> ad_rs()

の両関数のソースは
function ad_cn()

set ad_cn = Server.CreateObject("ADODB.Connection")

End function

function ad_rs()

set ad_rs = Server.CreateObject("ADODB.Recordset")

end function

でいつも使っているのですが、通常は問題ありません。

> それとadopenstatic等、ロックとカーソルを指定していますが。
> これは変数もしくは定数で数値を渡してますでしょうか？
> 多分渡しているとは思いますが。念のため一応確認してみました。

adopenstaticはそのままで数値は渡していません。
数値で渡したほうが良いのですか？
いつもこのような使い方をしていたのですが、間違いでしょうか？m(_ _)mよろしくお願いします。

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ