<%
strcat = request("cat")
' Create a recordset object to store specific table information
Set conn = Server.CreateObject("ADODB.Recordset")
'Establish what records you want selected for the SQL query string
SQL = "Select * From TblServiceCategories where CategoryName = '" + strcat + "'"
'Set the recordset object equal to the SQL query string
conn.Open SQL, objADO, 1, 3
strservcat = conn("CategoryName")
strservcat2 = request("txtcat")
If Request.form <> "" Then
if strservcat2 = "" then
strWarningErrMsg = "
All fields are required."
end if
if strWarningErrMsg = "" then
conn("CategoryName") = strservcat2
Conn.update
Response.redirect "manageservices.asp"
end if
end if
%>
EDIT SERVICE CATEGORY
<% if strWarningErrMsg <> "" then %>
| Error(s):<%= strwarningErrMsg %>
|
<% end if %>
Edit the service category below.