Script De Deletar Usuario Com Falha

[mestre fyoda]

Gostaria de colocar nesse script um jeito do usuario não deletar o usuário Master

<%@ Language=VBScript%>
<% Option Explicit %>
<%
	Dim intSno,intDelid,conn,a
	intSno=Request("Delete")

	set conn=Server.CreateObject("ADODB.Connection")
	conn.Provider="Microsoft.Jet.OLEDB.4.0"
	conn.Open(Server.Mappath("banco.mdb"))

usuario = Request.Form("usuario")
SQL = "select * from usuarios where usuario = '"&usuario&"' "
Set RS = conexao.Execute(SQL)

	a=split(intSno,",")

	dim iLoop
	for iLoop=LBound(a) to UBound(a)
  intDelid=Trim(a(iLoop))
  
  
  conn.Execute "delete from usuarios where id=" & intDelid & ""
	next
  Response.Redirect "del_sucesso.asp" 


	conn.Close
	set conn=nothing

%>

[mestre fyoda]

então cara , valeu pela ajuda , obrigado a todos que me ajudaram

[Victor]

É só você colocar o outro no value também assim:

conn.Execute "delete from usuarios where id = " & intDelid & " and id = " intdelid " "

Caso tenha mais alguma dúvida, é só chamar que eu estarei a disposição!!!

[]'s

Victor