![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
簡単に作ったソースなのですが、
以下の構文でエラーが発生します。
Dictionaryで作成したオブジェクトの束を配列として
格納させ、更にその配列を復帰値として取得し、メインルーチンにて展開させようと思っています。
以下のソースで考えられることございますか?
色々調べているのですが、述べ2日ハマっています。
----------------------------------------------
Dim AAA,BBB(),CCC
Set CCC=TEST
'CCCオブジェクトを展開し、値を画面に表示させる
’(未着手)
private function TEST()
Set AAA = CreateObject("Scripting.Dictionary")
AAA.Add "1","111"
ReDim Preserve BBB(0)
Set BBB(0) = AAA
Set TEST=BBB ←エラー個所
Exit Function
End Function
---------------------------------------------
エラー タイプ
Microsoft VBScript 実行時エラー (0x800A01A8)
オブジェクトがありません。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
う~ん。
何がなさりたいのかよく解らないのですが、配列にDictionaryオブジェクトを格納したいんですよね?
念のため確認しますが、これはサーバーサイドスクリプトですよね?
こうじゃないかなぁ。(インデントのため全角スペース使用)
' ** 関数TEST宣言
Function TEST()
Dim AAA
Dim BBB()
Set AAA = Server.CreateObject("Scripting.Dictionary")
AAA.Add "1","111"
Set BBB(0) = AAA
ReDim Preserve BBB(0) ' ** ←意味を理解して使ってください
TEST = BBB
End Function
' ** 関数TESTコール
CCC = TEST() ' ** CCCのDimは要りません。Dimするとエラーになります。
これで上手く行ったとしても所詮付け焼刃です。
あなたのスキルにはなっていないと思います。他の質問で皆さんが
おっしゃっている通り、一度参考書ご自分で購入されて、きちんと
最初から理解していくことが大切なのでは?
お説教はいらない、答えだけ教えてくれればそれでいい、と
おっしゃるのならあなたの質問に二度と返信はつけませんが。(- -;)
参考URL:http://www.f-store.net/asp/home.asp
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Perl perl このテキストファイルを簡単に配列に入れるには? 2 2022/04/27 20:24
- Excel(エクセル) ¥マークを含むパスの処理について(マクロ、または関数) 2 2022/12/25 02:11
- SQL Server ACCESSで3ファイルを結合して、表を作成するやり方を教えて下さい。 17 2022/08/15 20:34
- SQL Server ACCESSで複数テーブルを結合して、リストを作る方法を教えてください。 2 2022/08/12 19:32
- SQL Server ACCESSで表が作りたく、そのためのSQL文や設定方法を教えてください。 1 2022/08/15 12:28
- その他(データベース) カラム上の重複を削除するクエリを教えてください 3 2022/04/12 14:11
- Visual Basic(VBA) エクセルVBA Workbook変数に変数を使ったファイル名を格納したい 5 2023/06/13 14:46
- Visual Basic(VBA) Excle VBA Findメソッドについて 3 2022/07/15 13:56
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
【Excel VBA】マクロをボタンに...
-
なぜこんな初歩的なVBAのIf文で...
-
VBAでのエラー
-
VBS実行時エラー オブジェクト...
-
'Cells'メソッドは失敗しました...
-
ExcelVBA Range クラスの Page...
-
OLEDB.NETで接続できない
-
AccessVBAでExcelを起動し、罫...
-
ワードで「エラーブックマーク...
-
VBA エラーと対策
-
Excel2019 ワークシートのコピ...
-
職場から目的地までの距離集計
-
ASP.NET OleDbConnectionが定義...
-
アクセス 実行時エラー3265
-
ExcelのVBAのAutoFillの使い方...
-
VB6+SQL サーバー 2000 で 実行...
-
Invalid procedure call or arg...
-
実行エラー9 インデックスが...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
【Excel VBA】マクロをボタンに...
-
なぜこんな初歩的なVBAのIf文で...
-
マクロについて教えてください...
-
実行時エラー3001「引数が間違...
-
VBAがブレークモードになっ...
-
ExcelVBA Range クラスの Page...
-
VBSで変数の宣言はできないので...
-
VBS実行時エラー オブジェクト...
-
OLEDB.NETで接続できない
-
プロシージャ名の取得
-
EXCEL VBAマクロ中断でデバッグ...
-
ADODB.Streamを使用してUTF-8を...
-
VBAでのエラー
-
実行時エラー48発生時のDLL特定...
-
Outlook.ApplicationをCreateOb...
-
VB6+SQL サーバー 2000 で 実行...
-
実行時エラー -'-2147417848
-
「コンパイルエラー:プロシー...
おすすめ情報