なんでも掲示板

掲示板ID[soft] Ver 2.00.05

掲示板ＴＯＰ　掲示板縦断　[下][EX]　近藤＆ワイプロサーチ　いい掲示板 - CGI(Perl PHP) -

[86] 題名:DataGrid を実行時にデータ連結する方法 AC2000 MDB 投稿者:近藤投稿日:2003/01/29 16:04 　

Option Explicit

Private cn As ADODB.Connection
Private rs As ADODB.Recordset

Private Sub Form_Load()
' データベースに接続
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\WORK\2000Book.mdb"
cn.Open
' レコードセットを取得
Set rs = New ADODB.Recordset
With rs
.ActiveConnection = cn
.CursorLocation = adUseServer
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Properties("IRowsetIdentity") = True 'コメントを外すとデータを表示できます
.Open "SELECT * FROM 本", , , , adCmdText
End With
' データグリッドコントロールに取得したレコードセットを表示
Set DataGrid1.DataSource = rs
End Sub

[85] 題名:DataGrid を実行時にデータ連結する方法ＡＣ投稿者:近藤投稿日:2003/01/29 16:03 　

[79] 題名:Re:VCで*.mdb のソートができない投稿者:近藤投稿日:2002/11/30 21:35 　

>１．ＶＣ６.０　ＷｉｎＸｐ
>
>　test\db.mdb 下記のテーブル定義のみ
>　ODBC経由、基本クラスは CRecordset
>
> Pin RaceName Distance
>----------------------------
> 2 200 220
> 1 100 110
> 4 400 440
> 3 300 330
> 5 500 550
>
>　レコード削除、追加、更新は可能ですが、
>ソートがうまくいきません。
>　cstr に１列目"Pin"をセットして
> 　m_Rs.m_strSort = cstr;
> m_Rs.Requery();
> するだけなのですが動作しません。
>
>
>// レコード昇順ソートキー１個 ( CStinrg cstr)
>// 戻り値：０：正常－１：なし cstr:第１キー
>int CTest_dbDlg::RecDataSort1( CString cstr)
>{
>// TODO: この位置にコントロール通知ハンドラ用のコードを追加してください
>
>#if 0　// オープンタイプ
>m_Rs.Close();
>// ソート文字列を設定します。
>// m_Rs.m_strSort = cstr + "ASC";
>m_Rs.m_strSort = cstr; // デフォルト：昇順:ASC
>
>// ソートクエリーを実行します。
>m_Rs.Open( CRecordset::snapshot, "MyRs" );//テーブル名
>// m_Rs.Open();
>m_Rs.Requery();
>#else　//　リクエリータイプ
>// ソート文字列を設定します。
>// m_Rs.m_strSort = cstr + " ASC";
>m_Rs.m_strSort = cstr; // デフォルト：昇順:ASC
>
>// ソートクエリーを実行します。
>if( !m_Rs.CanRestart())
> 　　　　　return -1;
>m_Rs.Requery();
>#endif
>return 0;
>}
>

[78] 題名:Re[77]:ＶＢエラー　”エラーを特定できません”　ちょっと助けてください！！投稿者:近藤投稿日:2002/11/22 21:52 　

>VB6.0 SP4で開発を行ったアプリでエラーが発生するのですが、解決の糸口が見えず
>どなたかよくご存知の方、教えて頂けないでしょうか？
>
>Err.Number="-2147467259"(10進) "80004005"(16進)
>Err.Description="ランタイムエラー","エラーを特定できません"
>
>Err.Source,Err.NatviError,Err.HelpFile,Err.HelpContext等はエラー発生時
>値が無いのか情報が帰ってきません。
>
>MSDNで"80004005"にて検索をかけ８０件ほどヒットしたのですが該当しそうなエラーはありませんでした。
>
>下記２点を教えてください。よろしくお願い致します。
>
>　１．より詳細なエラー情報を得る方法。
>
>　２．特定できないエラーの場合、何をとっかかりして探っていけばよいのでしょうか？
>　
>　なお、動作環境は以下のとおりです。
>　OS：Windows2000 Server
>　DB: SQLServer2000
>　ASPとCOM+を連動させたWebアプリケーションにおける、COM+内部処理にて発生

まず、ＶＢ６．０ですがＳＰ５にしましょう。
それから、内容からどこで、エラーが発生しているかよくわかりません。
＞ASPとCOM+を連動させたWebアプリケーションにおける、COM+内部処理にて発生
ここでエラーが発生しているのでしょうか？
ＯＣＸ／ＡＶＴＩＶＥＸ内部でエラーが発生している場合、
ＶＢでは、どうしようもありません。ＯＣＸ／ＡＶＴＩＶＥＸは、自作なんでしょうか？

ソフト開発塾の匿名メールも届いていました。
では、また！！

[77] 題名:ＶＢエラー　”エラーを特定できません”　ちょっと助けてください！！投稿者:wadman 投稿日:2002/11/22 19:02 　

VB6.0 SP4で開発を行ったアプリでエラーが発生するのですが、解決の糸口が見えず
どなたかよくご存知の方、教えて頂けないでしょうか？

Err.Number="-2147467259"(10進) "80004005"(16進)
Err.Description="ランタイムエラー","エラーを特定できません"

Err.Source,Err.NatviError,Err.HelpFile,Err.HelpContext等はエラー発生時
値が無いのか情報が帰ってきません。

MSDNで"80004005"にて検索をかけ８０件ほどヒットしたのですが該当しそうなエラーはありませんでした。

下記２点を教えてください。よろしくお願い致します。

　１．より詳細なエラー情報を得る方法。

　２．特定できないエラーの場合、何をとっかかりして探っていけばよいのでしょうか？
　
　なお、動作環境は以下のとおりです。
　OS：Windows2000 Server
　DB: SQLServer2000
　ASPとCOM+を連動させたWebアプリケーションにおける、COM+内部処理にて発生

ホーム