<%if session("username")="" then%> <%end if%>

THÊM MỚI KHÁCH HÀNG

<% if request("action")="submit" then idmodule=replace(request("idmodule"),"'","''") link=replace(request("link"),"'","''") pathanh=replace(request("pathanh"),"'","''") pathanh1=replace(request("pathanh1"),"'","''") txtNTitle=replace(request("txtNTitle"),"'","''") quotation=replace(request("quotation"),"'","''") top1=replace(request("top1"),"'","''") openconn set rs=server.CreateObject("adodb.recordset") sql="insert into tblcat(idmodule,link,Title,quotation,Image,Image1,top1) values('"&idmodule&"',N'"&link&"',N'"&txtNTitle&"',N'""ation&"','"&pathanh&"','"&pathanh1&"','"&top1&"')" conn.execute(sql) response.Redirect("?saoviet=5&Quan-ly-khach-hang.html") %> <%end if%> <% openconn set rs=server.CreateObject("adodb.recordset") rs.open"Select * from tblmodule where idparrent=0 and top1=2 order by positions ASC",conn,3,1 if not rs.eof then do while not rs.eof %> <% i=1 openconn set rs1= server.CreateObject("adodb.recordset") rs1.open "select * from tblmodule where idparrent="&rs("idmodule")&" order by positions ASC", conn,3,1 if not rs1.eof then do while not rs1.eof %> style="background-color:#E3E2DE; color:#000000;"<%else%><%end if%> value='<%=rs1("idmodule")%>'>  <%=rs1("name")%> <% rs1.movenext i=i+1 loop end if rs1.close %> <% rs.MoveNext i=i+1 loop end if rs.close %> Khách hàng nổi bật trang chủ    Tải ảnh..    Tải ảnh..