Type mismatch

sporkman43 · August 13th, 2003, 08:42 AM

It's me again. I've got the SQL server working now, thanks to Chris. Now it gives me this error:

Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch

This is the only error I've gotten since the switch from access to sql. The code for the error line is as follows:

  If Not (StrComp(objRS("password"), strpass, _
        vbBinaryCompare) = 0) Then
    objRS.Close
    Set objRS = Nothing
    objConn.Close
    Set objConn = Nothing
    Response.Write "<A HREF='index.html'> User name did not match up to password. </A> <P>"
    Response.End
  End If

The error strikes on that first line. Any help would be great thanks.

kilika · August 13th, 2003, 09:20 AM

I have never used the StrComp function, but the error simply means that one of the values you are passing in is not the same type as the value the function should receive. I have run into this a few times when passing in an int into a double or something like that. Maybe explicitly cast them before they hit the function:

Code:

If Not (StrComp(Cstr(objRS("password")), cstr(strpass), _
        vbBinaryCompare) = 0) Then

These are my thoughts. Maybe they are not even hitting close. Beyond this, I am not sure as of yet. Try that and see. Maybe recheck the parameter datatypes again.

Chris

sporkman43 · August 13th, 2003, 12:57 PM

No dice with Chris's advice. Rhyme scheme is working apparently. Any other ideas? Perhaps there is a similar function I could use?

stephanel · August 13th, 2003, 02:32 PM

Did you check the value of vbBinaryCompare? It should be equal to 0. With what Chris have suggest, can't find anything wrong whit the code.

StÃ©phane Lajoie

pgtips · August 14th, 2003, 03:27 AM

Quote:

quote:Originally posted by sporkman43
No dice with Chris's advice. Rhyme scheme is working apparently. Any other ideas? Perhaps there is a similar function I could use?

Umm, how about just using = (or <> in your case).
If objRS("password") <> strpass Then ...