类型不匹配
<%@ Language=VBScript %>
<!--#include file="Index.asp" -->
<%
TxtStaff=Request.QueryString("TxtStaff")
TxtName=Request.QueryString("TxtName")
If trim(TxtStaff)<>"" then
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "DSN=TimeBill Source;UID=sa;PWD=;DATABASE=Timebill"
Set Rs=Server.CreateObject("ADODB.RecordSet")
Sql="SELECT STAFF_NAME FROM STAFF WHERE STAFF_CODE='"& TxtStaff &"'"
'Response.Write sql
Set Rs=Conn.Execute(Sql)
IF NOT Rs.EOF Then
TxtName=Rs.Fields(0).value
'Response.Write Rs.Fields(0).value
Else
alert ("No This Staff!")
End If
Rs.Close
Set Rs=Nothing
Conn.Close
Set Conn=Nothing
Else
alert("Please select a record!")
End If
%>
我的代码是这样的,但运行时,当查不到数据时,它提示alert类型不匹配!请问个位大侠这是为什么啊?