ช่วยทีค่ะ เราสร้างฟอร์มแก้ไขข้อมูลพนักงาน แต่พอกดที่รหัสพนักงานเพื่อที่จะแก้ไข แต่ทำไมมันไม่ขึ้นข้อมูลเดิมให้ค่ะ ช่วยทีน่ะค่ะเรานั่งทำมาทั้งวันแล้ว ที่แรกได้แล้ว แต่แก้ไปแก้มาไม่ขึ้นแล้ว

<%@LANGUAGE="VBSCRIPT" CODEPAGE="874"%>
<% Response.CacheControl = "no-cache" %>
<% Response.AddHeader "Pragma", "no-cache" %>
<% Response.Expires = -1 %>
<!--#include file="Connections/ConnectEmp.asp" -->
<%
Dim RS
Dim RS_numRows


Set RS = Server.CreateObject("ADODB.Recordset")
RS.ActiveConnection = DB
RS.Source = "SELECT * FROM Employee where EmployeeID='"+EmployeeID+"' "
RS.CursorType = 0
RS.CursorLocation = 2
RS.LockType = 1
RS.Open()

RS_numRows = 0
%>
<%
if  not RS.eof  then
	EmployeeID=(RS.Fields.Item("EmployeeID").Value)
	DDate=(RS.Fields.Item("DDate").Value)
	Prefix=(RS.Fields.Item("Prefix").Value)
	FirstName=(RS.Fields.Item("FirstName").Value)
	LastName=(RS.Fields.Item("LastName").Value)
	FirstName_Eng=(RS.Fields.Item("FirstName_Eng").Value)
	LastName_Eng=(RS.Fields.Item("LastName_Eng").Value)
	Sex=(RS.Fields.Item("Sex").Value)
	Birthday=(RS.Fields.Item("Birthday").Value)
	Address=(RS.Fields.Item("Address").Value)
	City=(RS.Fields.Item("City").Value)
	District=(RS.Fields.Item("District").Value)
	Region=(RS.Fields.Item("Region").Value)
	Postcode=(RS.Fields.Item("Postcode").Value)
	Phone=(RS.Fields.Item("Phone").Value)
	Mobile=(RS.Fields.Item("Mobile").Value)
	Department=(RS.Fields.Item("Department").Value)
	Email=(RS.Fields.Item("Email").Value)
	
else
	'EmployeeID=""
	'DDate=""
	'Prefix=""
	'FirstName=""
	'LastName=""
end if 
%>
<%
EmployeeID=""
if Request.QueryString("EmployeeID")<>"" then  EmployeeID=Request.QueryString("EmployeeID")


response.Write(EmployeeID)

%>