Microsoft Access ClubAccess超初心者対象ForumAccess初級者対象ForumAccess初・中級者対象ForumAccess VBA Tips ForumDAO、ADO、SQL Forum

     

No85801.レコードの並び替え でエラー

タイトルレコードの並び替え でエラー
記事No: 85801
投稿日: 2006/08/17(Thu) 17:09
投稿者: まこり
OS:XP
Access Version:2000

はじめまして。5年ぶりにアクセスを使うことになり
忘れてしまったり、変わってしまったことがいっぱいで四苦八苦しています^^;
早速ですが、レコードの並び替えでエラーが出てしまい、息詰まっています。

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = CurrentProject.Connection
Set rs = New ADODB.Recordset
rs.Open "T_処理年度", cn, adLockOptimistic, adOpenKeyset
rs.Sort = "処理年度 ASC"    ---@

@実行時に、「現在のプロバイダは並べ替え、またはフィルタリングに必要なインターフェース
をサポートしていません」とのエラーです。
ご教授おねがいいたします。

タイトルRe: レコードの並び替え でエラー
記事No: 85802
投稿日: 2006/08/17(Thu) 17:14
投稿者: Moko
> rs.Open "T_処理年度", cn, adLockOptimistic, adOpenKeyset

rs.Open "T_処理年度", cn, adOpenKeyset, adLockOptimistic

ですね。

タイトルRe^2: レコードの並び替え でエラー
記事No: 85804
投稿日: 2006/08/17(Thu) 17:20
投稿者: まこり
Moko 様 早速のアドバイスありがとうございます。

>rs.Open "T_処理年度", cn, adOpenKeyset, adLockOptimistic
ご指摘通りに修正したのですが、同じエラー内容が出てしまいました。
引き続きご教授お願いいたします。

タイトルRe^3: レコードの並び替え でエラー
記事No: 85805
投稿日: 2006/08/17(Thu) 17:39
投稿者: Moko
> Set cn = CurrentProject.Connection
cn.CursorLocation = adUseClient
> Set rs = New ADODB.Recordset

でいかがでしょうか?

タイトルRe^4: レコードの並び替え でエラー
記事No: 85808
投稿日: 2006/08/17(Thu) 18:03
投稿者: まこり
Moko様

>Set cn = CurrentProject.Connection
>cn.CursorLocation = adUseClient
>Set rs = New ADODB.Recordset

動きました!
早速ネットで検索してみますと 「RecordsetオブジェクトのCursorLocationプロパティの値が
adUseClientである場合に限り,Sortプロパティを用いてレコードの並べ替えが可能になります」
との説明記述も見つかりました。

初歩的な質問にもかかわらず、
早々のアドバイスとても助かりました。本当にありがとうございました。

タイトルRe^4: レコードの並び替え でエラー
記事No: 85809
投稿日: 2006/08/17(Thu) 18:04
投稿者: Moko
もっとも
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strSQL As String

strSQL = "SELECT * FROM T_処理年度 ORDER BY 処理年度"

Set cn = CurrentProject.Connection
Set rs = New ADODB.Recordset
rs.Open strSQL, cn, adLockOptimistic, adOpenKeyset

のようにすれば、Sort を持ち出すまでもないですが。


このAccessフォーラム過去ログ集は、Microsoft Access Club が運営しています

動画配信(ダウンロード、ストリーミング)対応の専用レンタルサーバー。データセンター設置場所はアメリカ合衆国です。: 動画サーバードットコム
動画配信(ダウンロード、ストリーミング)対応の専用レンタルサーバー。
データセンター設置場所はアメリカ合衆国です。
100Mbps〜1Gbpsまで対応できます。

 

ページの先頭へ 前ページへ戻る