ผมจะดักบัคค่าซ้ำกัน โค้ดที่เขียนอย่างงี้ถูกไหมครับ จะดักค่าซ้ำของUsername

<%
session.CodePage ="65001"
if Session("admin")="" then
	Response.Redirect("check.asp")
end if
%>
<!--#include file="adminhead.asp"-->


<%
If request.querystring("Action")="Add" then
	Session.codepage="65001"
	Dim sql,rcou,a
	Dim Conn,strSQL,objExec

	sql="select * from guest where username='" & Request.Form("txtuser") & "' "
	Set rcou=con.execute(sql)
	If Not rcou.EOF then
	a=rcou.fields("username").value
	If a = Request.Form("txtuser") then
		Response.Write ("<script>alert('รหัสนี้มีผู้ใช้แล้ว');</script>")
	Else 
	dim d
	d=date()
	'response.write(d)
	
	strSQL = ""
	strSQL = strSQL &"INSERT INTO guest "
	strSQL = strSQL &"VALUES ('"&request.Form("txtuser")&"','1234','"& request.Form("txtname") &"','"&request.Form("txtnameen")&"','" & request.Form("txtadd")&"','" & request.Form("txttel") &"','" & request.Form("txtmail") & "','" & d & "')"
	Set rec = con.Execute(strSQL)
	
	Response.Write ("<script>alert('เพิ่มเรียบร้อย');</script>")
	Response.Write ("<script>window.location='admin.asp';</script>")
	
	End if

	End if
	
End if
%>


<form method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>?Action=Add" name="inuser" onsubmit="return checkuser();">
	<table width="497" border="1" align="center">
	<th align="center" colspan="2">เพิ่มรายชื่อ</th>
<tr>
			<td><label>
			<div align="right">รหัสผู้ใช้</div>
	  </label></td>
			<td><input name="txtuser" type="text" size="50"></td>
		</tr>
		<tr>
			<td><label>
			<div align="right">ชื่อผู้ใช้</div>
		  </label></td>
			<td><input name="txtname" type="text" size="50"></td>
		</tr>
		<tr>
			<td><label>
			<div align="right">ชื่อผู้ใช้(อังกฤษ)</div>
		  </label></td>
			<td><input name="txtnameen" type="text" size="50"></td>
		</tr>
		<tr>
			<td><label>
			<div align="right">ที่อยู่</div>
		  </label></td>
			<td><textarea name="txtadd" rows="5" cols="50"></textarea></td>
		</tr>
		<tr>
			<td><label>
			<div align="right">เบอร์โทรศัพท์</div>
		  </label></td>
			<td><input name="txttel" type="text" size="50"></td>
		</tr>
		<tr>
			<td><label>
			<div align="right">Email</div>
		  </label></td>
			<td><input name="txtmail" type="text" size="50"></td>
		</tr>
		<tr align="center">
			<td colspan="2">
			  <div align="center">
			    <input type="submit" value="ตกลง">
	          </div></td>
		</tr>
	</table>
</form>