Wörterbuch Typenkonflikt in VBScript

Question

Der Fehler Ich erhalte ist: Typenkonflikt: ‚Stylesheets‘

Sheets ist definiert als:

sub stylesheets(collection)
    for each key in collection.Keys
        response.write(stylesheet(key, collection.Item(key)))
    next
end sub

' returns a link tag for each object in the collection
function stylesheet(asset, media_type)
    if (media_type="") then
        media_type="screen"
    end if
    return "<link href=""" & asset_url(asset) & """ type=""text/css"" media=""" _
        &  media_type & """ />"
end function

Und sie als solche genannt werden:

<% stylesheets(site_stylesheets) %>

Wo site_stylesheets definiert wurde als:

' stylesheets is a collection of the stylesheets to be included on all pages
Set site_stylesheets = CreateObject("Scripting.Dictionary")
site_stylesheets.Add "css/endoworks.css", "screen"

Es ist schon eine lange Zeit, da ich ein VBScript-ing getan habe. Ich würde wirklich jede Hilfe dankbar.

Answer 1

ich am Ende nur die Schleife Logik Platzierung von stylesheets in die header sub [Routine]. Es funktioniert jetzt.

@ Tester101:. Ich habe versucht, Ihre Vorschläge, aber sie haben das Problem nicht beheben

Edit: Ich tatsächlich entdeckt, dass ich ein stylesheets Argument in dem header Unterprogramm hatte die ist, wo die stylesheets Unter genannt wurde. So versuchte es nothing mit einem Argument von site_stylesheets auszuführen. Kann nicht glauben, dass ich das verpasst haben.

Answer 2

Versuchen Sie, die Klammer zu entfernen, wenn Sheets aufrufen. finden Sie unter diese Frage für weitere Informationen. Ich glaube nicht, können Sie Klammern verwenden, wenn eine Unter mit nur einem Parameter aufgerufen wird.

Versuchen Sie diese

<% stylesheets site_stylesheets %>

oder das

<% call stylesheets(site_stylesheets) %>