変数の定義の仕方をご教授ください。

質問

Option Explicit

Function EncodeURI(uri As String) As String
Set sc = CreateObject("ScriptControl")
sc.Language = "JScript"
Set js = sc.CodeObject
EncodeURI = js.encodeURIComponent(uri)
End Function
-------------------------------------------

をデバッグすると「sc =」と「js =」の部分が「変数が定義されていません」となってしまいます。

変数を宣言する時に、
dim　sc　 as　まではわかるのですが変数のデータ型を何にしてあげればいいのでしょうか？

回答No.1

nao-y · ベストアンサー

Object
で良いと思いす。

お礼

Objectでできました！ありがとうございました。