none
Microsoft VBScript runtime error

    Question

  • Hello,

    I am currently getting the following error:

    Microsoft VBScript runtime error '800a000d'

    Type mismatch: 'QueryString'

    /admin/equipment/addequipment.asp, line 128

    This is when i try to submit a new database item in Dreamweaver. The DB I am using is SQL Server 2005.

    My code is as follows:

    Dim equipspec__urlid
    equipspec__urlid = "1"
    If (QueryString("ID") <> "") Then
    equipspec__urlid = QueryString("ID")
    End If
    %>
    <%
    Dim equipspec
    Dim equipspec_numRows

    Set equipspec = Server.CreateObject("ADODB.Recordset")
    equipspec.ActiveConnection = MM_intranet_STRING
    equipspec.Source = "SELECT * FROM EquipSpec WHERE " + Replace(equipspec__urlid, "'", "''") + " = EquipSpec.ID"
    equipspec.CursorType = 0
    equipspec.CursorLocation = 2
    equipspec.LockType = 1
    equipspec.Open()

    Would be greatful if anybody could help, let me know if you need more info.

    Many thanks.
    Wednesday, August 02, 2006 4:00 PM

Answers

  • This is not a TSQL issue. You have a type mismatch in your VB code. The error message contains the line in your source code so check that to see the problem.
    Wednesday, August 02, 2006 10:00 PM