VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2005/02/03(Thu) 11:53
投稿者： こう
ＵＲＬ：
タイトル： レコードセットでEXCELの値を書き込みたい

お世話になります。

レコードセットでEXCELの値を書き込みたいのですが
今ひとつレコードセットに値を代入出来ません

Dim db                As DAO.Database
Dim RS                As DAO.Recordset

    Set db = OpenDatabase(strPath & strSheetName & ".xls", True, False, _
                 "Excel8.0;HDR=no;IMEX=1;")
    Set RS = db.OpenRecordset(strSheetName & "$", dbOpenDynaset)

    RS.MoveFirst
    RS.Edit
    RS.Fields(0) = "sss"
    RS.Fields(1) = "aaa"
    RS.Update

    RS.Close
    Set RS = Nothing
    db.Close
    Set db = Nothing

上記で、RS.Fields(1)に"aaa" を代入しようとしたら
NULLで入りません

初心者ですみません
ご存知の方ご教授下さい
宜しくお願い致します。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -