3

クラシックASP（Windows CE）でナビゲーションシステムを作成しています。呼び出し元のスクリプトに基づいてナビゲーションファイルを動的に含める方法が必要です。呼び出し元のスクリプトのフォルダーにあるnav.incを含む次のコードを考え出し、さまざまなフォルダーでさまざまなナビゲーション機能を使用できるようにしました。

これはWindowsテストマシンでは正常に機能しますが、WindowsCEに展開する場合は機能しません。コードとエラーを以下に示します。誰かが回避策や素晴らしいフィードバックを提供できれば。ありがとう

コード：

<% 
   'Get path name
   Dim i
   fullname = Request.ServerVariables("SCRIPT_NAME")
   my_array=split(fullname,"/")
   fname=my_array(ubound(my_array))
   fname = ""

   For i = 0 to ubound(my_array) - 1
    fname = fname & my_array(i) & "/"
   Next

   fname = fname & "nav.inc"

   Set fs=Server.CreateObject("Scripting.FileSystemObject")

   If (fs.FileExists(Server.MapPath(fname)))=true Then
    Server.Execute(fname)
   End If
  %>

エラー：

Microsoft VBScriptランタイムエラー：「800a01b6」

説明：オブジェクトはこのプロパティまたはメソッドをサポートしていません：'Server.CreateObject'

Set fs=CreateObject("Scripting.FileSystemObject")次のエラーが発生するようにコードを変更すると、次のようになります。

Microsoft VBScriptランタイムエラー：「800a01ad」

説明：ActiveXコンポーネントはオブジェクトを作成できません：'Scripting.FileSystemObject'

更新Server.Executeを直接実行しようとしましたが、これも失敗します。サーバーオブジェクトにアクセスできないようです。これについても回避策はありますか？

4

1 に答える 1

4

CreateObjectおよびExecuteWindowsCEではサポートされていません。
タグもサポートされ<OBJECT>ていないので、運が悪いのでごめんなさい。

Server Object Implementation
---------------------------

The Server object provides access to methods and properties on the server. 
Most of these methods and properties serve as utility functions.

Server method  Windows CE implementation
-----------------------------------------
CreateObject   Not supported
Execute        Not supported
GetLastError   Not supported
HTMLEncode     Not supported
MapPath        Fully supported
ScriptTimeout  Not supported
Transfer       Not supported
URLEncode      Fully supported

ソース

于 2010-04-08T12:29:34.003 に答える