Hey all

Well after some help from the VB guy's here in the office we found the faul .. easy really

Alway's remember the trim(STRING) = trim(string)

It turned out the the string returned from teh Recordset had a Space after the owrd and as we all know according to VB if there's a space it aint the same

Here's the code Finaly and it works!!!!

*****
if trim(rsResults("Comp_PWD")) = trim(Request.Querystring("sPWD")) then
Response.write "Test Suceeded"
else
Response.write "try Again<br>"
end if
*****

Simple I know but if you can't find the fault it's a major headace!!!

Cheers and Enjoy!