[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/10/29(Fri) 19:41
投稿者名:nobu
Eメール:
URL :
タイトル:
DAO と ADO
何時も参考にさせていただいています。ありがとうございます。
解決策を検索しては見たのですが見つけ出せなかったので教えて下さい。

1.Excel 用ファイルをMSFlexGridに表示する(DAOを利用)      (234)
  'MSFlexGridと連結
  Set Data1.Recordset = RS

  ここでの Data1 の宣言はどの様に書けば良いでしょうか?
  「変数が定義されていません」のエラーが出ます。

2.ADOを使ってCSVファイルをMSHFlexGridに表示する      (284)
  1行が14項目のcsvファイルを表示させています。
  15000行ほどあるファイルなのですが500行程度までしか
  表示されません。 Vスクロールバーを動かしても
  これ以上のデータ表示をしません。
  表示セル数の制限なのでしょうか?
  解決策はありますでしょうか?
  

投稿時間:2004/10/29(Fri) 22:27
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: DAO と ADO
>   ここでの Data1 の宣言はどの様に書けば良いでしょうか?
>   「変数が定義されていません」のエラーが出ます。

コメントの部分はどう処理しましたか?
Data1 は(VBの標準)コントロール名です。
  'フォームにMSFlexGridコントロールとデータコントロールを貼り付け
  'デザイン時に下記プロパテイをセットしておいて下さい


> 2.ADOを使ってCSVファイルをMSHFlexGridに表示する      (284)
>   1行が14項目のcsvファイルを表示させています。
>   15000行ほどあるファイルなのですが500行程度までしか
>   表示されません。 Vスクロールバーを動かしても
>   これ以上のデータ表示をしません。
>   表示セル数の制限なのでしょうか?
制限ではありません。

データに問題があるのでは?
同列内で数値型と文字列型が混在していませんか?

投稿時間:2004/10/30(Sat) 07:57
投稿者名:nobu
Eメール:
URL :
タイトル:
Re^2: DAO と ADO
早速の回答ありがとうございました。

> コメントの部分はどう処理しましたか?
> Data1 は(VBの標準)コントロール名です。
>   'フォームにMSFlexGridコントロールとデータコントロールを貼り付け
>   'デザイン時に下記プロパテイをセットしておいて下さい

済みません、初歩的ミスでした。
データコントロールを貼り付けていなかった。お恥ずかしい。

> データに問題があるのでは?
> 同列内で数値型と文字列型が混在していませんか?

確かに複数の項目は  ,"21", とか ,"21.110", とかがあります。
csvを作成する時に Write 文で書き出しているので全項目が " で囲まれています。

ADOを使ってCSVファイルをMSHFlexGridに表示する      (284)の
最下段のhhttp://www.akj.co.jp/aug/qa/ans0001-0050/0315.html リンクは
切れているようですが、Webでschema.iniを検索すると下記がありました。
hhttp://www.geocities.co.jp/SiliconValley/4805/vbtips/vbtips118.htm

ここの説明では「...MDBにインポート...」とありますので
修正しないといけないかと思いますが初めての事なので調べて見ます。
11/1の午前中頃までは時間が取れませんのでそれ以降になります。

投稿時間:2004/11/01(Mon) 09:59
投稿者名:kazuやん
Eメール:
URL :
タイトル:
Re^3: DAO と ADO
> > データに問題があるのでは?
> > 同列内で数値型と文字列型が混在していませんか?
↑これですが、以前私も同じ問題に当たり花ちゃんさんのご指摘で解決しました。

hhttp://www.bcap.co.jp/hanafusa/VBHLP/daoexcel.htm

上記の例題を見れば分かりますが、同列内に数値型・文字列が混在している場合は8行目までで多いデータ型を
基本にして読み込んでしまようようなので注意が必要です^^

> 早速の回答ありがとうございました。
>
> > コメントの部分はどう処理しましたか?
> > Data1 は(VBの標準)コントロール名です。
> >   'フォームにMSFlexGridコントロールとデータコントロールを貼り付け
> >   'デザイン時に下記プロパテイをセットしておいて下さい
>
> 済みません、初歩的ミスでした。
> データコントロールを貼り付けていなかった。お恥ずかしい。
>
> > データに問題があるのでは?
> > 同列内で数値型と文字列型が混在していませんか?
>
> 確かに複数の項目は  ,"21", とか ,"21.110", とかがあります。
> csvを作成する時に Write 文で書き出しているので全項目が " で囲まれています。
>
> ADOを使ってCSVファイルをMSHFlexGridに表示する      (284)の
> 最下段のhhttp://www.akj.co.jp/aug/qa/ans0001-0050/0315.html リンクは
> 切れているようですが、Webでschema.iniを検索すると下記がありました。
> hhttp://www.geocities.co.jp/SiliconValley/4805/vbtips/vbtips118.htm
>
> ここの説明では「...MDBにインポート...」とありますので
> 修正しないといけないかと思いますが初めての事なので調べて見ます。
> 11/1の午前中頃までは時間が取れませんのでそれ以降になります。

投稿時間:2004/11/01(Mon) 11:31
投稿者名:nobu
Eメール:
URL :
タイトル:
Re^4: DAO と ADO
ありがとうございます。
1.Excel 用ファイルをMSFlexGridに表示する(DAOを利用)(234)
の件はご指導をいただいたので解決しました。


2.ADOを使ってCSVファイルをMSHFlexGridに表示する (284)

> > > データに問題があるのでは?
> > > 同列内で数値型と文字列型が混在していませんか?
> ↑これですが、以前私も同じ問題に当たり花ちゃんさんのご指摘で解決しました。

SCHEMA.INI ファイルについて調べてトライしていましたが、昨日は未解決でした。
いま改めて試したらOKのようです。

SCHEMA.INI ファイルを下記の様に書いたら良い様です。

ColNameHeader = False
CharacterSet = OEM
Format = CSVDelimited
Col1=FLD_テキスト Char
...Col14まで同じに記載


hhttp://www.geocities.co.jp/SiliconValley/4805/vbtips/vbtips118.htm の
サンプルにて自動でSCHEMA.INI ファイルを作成すると
    Case dbText
        strType = strType & "Char"         'dbText テキスト型
        strType = strType & " Width " & fld.Size              <=== ここでエラーが出る

[コンパイル・エラー  メソッドまたはデータメンバーが見つかりません]

サンプルのiniなどを参考にして
SCHEMA.INI ファイルを上記の様に手で書いたら良い様です。
ありがとうございました。


...と思ったのですが違うようです。(出来たのは別の表示でした)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
もう少し調べてみます。