Hello everybody. Is there anyone who can help to solve my problem regarding Type-Mismatched Error. I've created a login script using ASP connecting to SQL Server 2000 Database. The error appears when I assigned recordset values to session.

<%
  dim rsTemp

  nLastName = trim(request("lname"))
  nFirstName = trim(request("fname"))
  nMidName = trim(request("mname"))
  nPword = Trim(request("pword"))

pSQLServerConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=memkeeper;Data Source=(local);"

'*** CHECK USERNAME FROM MAIN LIST AND GENERATE DATABASE FILENAME FROM ACCOUNT NUMBER ****************

mySQL = "SELECT tblAcct.LastName, tblAcct.MidName, tblAcct.FirstName FROM tblAcct WHERE (((tblAcct.LastName)='" & nLastName & "') AND ((tblAcct.FirstName)='" & nFirstName & "') AND ((tblAcct.MidName)='" & nMidName & "') AND ((tblAcct.Password)='" & nPword & "'));"

  set connSql = server.createObject("adodb.connection")
  connSql.Open(pSQLServerConnectionString)
  set rsTemp = server.createObject("adodb.recordset")

  rsTemp.lockType = adLockOptimistic
  rsTemp.cursorType = adOpenStatic
  rsTemp.cursorLocation = adUseClient
  rsTemp.open mySQL, connSql

  if rstemp.eof then
    cMsg = "Your authentication data is incorrect."
    response.redirect "message.asp?message=" & Server.Urlencode(cMsg)
  end if

  set rsTemp = nothing
  set connSql = nothing

  session("islogged") = 1
  session("fName") = rsTemp("FirstName") '<- The error appears here.
  session("mName") = rsTemp("MidName")
  session("lName") = rsTemp("LastName")
  session("acctName") = rsTemp("LastName") & ", " & rsTemp

  response.redirect "main.asp"
%>

Hii ghian72!!
session("fName") = rsTemp("FirstName")
>>>Check for the rsTemp("FirstName")
probably rsTemp("FirstName") returns null or empty
>>>solution 1:to avoid such error plz check before assignment
i.e do like
if(isNull(rsTemp("FirstName"))) then
session("fName") = " "
else
 session("fName") = rsTemp("FirstName")
end if

>>>solution 2:you can also get null string(i.e '') with sql query using
select isnull(FirstName,'') as FirstName from mytable

Hope this will help you