ASP Fehler 800a000d bzw. 800a0bb9

[emetiel]

Hi,

ich habe ein Problem bei welchem ich nicht wirklich weiter komme.

Es geht um ASP und folgende Fehlermeldungen

Microsoft VBScript runtime error '800a000d'
Type mismatch: 'HostName'
/TxtAndMail.asp, line 126

bzw.

ADODB.Fields error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/TxtAndMail.asp, line 135

Die erste Meldung erhalte ich, wenn ich mit "call HostName()" folgende Prozedur aufrufe.

sub HostName()
    dim pc
    Set pc = CreateObject( "Wscript.Network" )
    compname = pc.Computername
  end sub

Die Zweite bekomme ich, wenn ich innerhalb von TxtAndMail.asp anstelle  "call HostName()"
das hier:
    dim pc
    Set pc = CreateObject( "Wscript.Network" )
    compname = pc.Computername

eiingebe.
Die Variable compname ist innerhalb von TxtAndMail.asp einfach nur mit Dim compname angelegt. Wo liegt mein Denkfehler.

gruß
emetiel