Câu lệnh Select ... Where (SOS)

[ltuananh]

Tôi có đoạn code như sau:
<%
KtTen =trim(request.form("tennguon"))
KtTen=Replace(KtTen,"'","''")
Dim Kiemtra
Set Kiemtra=Server.CreateObject("ADODB.Recordset")
Kiemtra.CursorLocation=3
Kiemtra.Open "Select Tennguon from Nguon Where Tennguon='" & KtTen & "'", Conn
if Kiemtra.RecordCount>0 then
kq=KtTen & " Đã tồn tại"
%>
Nhưng không hiểu vì sao, trong bảng tôi đã có tên nguồn là Thử nghiệm, vậy mà biến KtTen="Thử nghiệm" nhưng không hiểu sao câu lệnh If của tôi không thỏa mãn, tôi nghĩ chắc là sai trong câu lệnh SQL, nhưng không biết sửa như thế nào, bạn chỉ giúp tôi với.

[quỷ kiếm]

du`ng lenh:
msgbox "Select Tennguon from Nguon Where Tennguon='" & KtTen & "'"
roi lay cau query na`y cho no' chay bang tri`nh quan ly' csdl (access hoac MS SQL)

ban cung co' the thu thay mot so tham so de xem no' bi loi o cho nao vi du:
"Select * from Nguon "
"Select * from Nguon Where Tennguon='Thử nghiệm' "
...
Xin loi vi` tui chua go~ duoc tieng viet o day

[ltuananh]

Cám ơn bạn, tôi đã sử dụng câu lệnh "Select * from Nguon Where Tennguon='Thử nghiệm' " của bạn, nhưng câu lệnh If của tôi vẫn không thỏa mãn luôn.
À dữ liệu trong bảng nguon của tôi được insert vào = câu lệnh:
Insert Into Nguon (tennguon) values (N 'Thử nghiệm');

[quỷ kiếm]

ý của tui là bạn thử câu truy vấn bằng chính chương trình quản trị csdl. Nếu bạn đang dùng csdl là access thì có thể dùng chương trình microsoft access. Còn MS SQL thì có thể dùng chương trình truy vấn do MS SQL cung cấp. vì thử các câu truy vấn ở trên đó mà không có dữ liệu thì chắc chắn là câu truy vấn bị sai --> từ từ sửa tiếp