Marcar todos checkbox e excluir registros

[ViaPocket]

O código não funciona direito.

Deveria verificar se existe pelo um checkbox marcado, se sim, direcionar para a página que falar o delete no banco de dados.

Mas ele apresenta algumas falhas:

1) quando só tem um registro no meu "grid" ele não reconhece o checkbox que marquei. Exibe logo a mensagem para selecionar um item.

2) Às vezes, quando selecione vários itens nem todos são apagados. Tipo, selecione uns 10 itens e uns 3 ou mais não são apagados talvez este seja problema na página que faz o delete.

Bom, se alguém tiver um script para esta finalidade ficarei agradecido.

<script language="JavaScript">

function verificaSelecaoCheckbox()
 {
 var checkSelected=false;
 for(var i=0;i<document.frmGrid.IDRegistro.length;i++)
 { 
var total=0;
 if (document.frmGrid.IDRegistro[i].checked){
 checkSelected=true; 
total=total+1; //total selecionado 
}
 for(var j=0;j<total;j++)
 { 
document.frmGrid.action="acoes/delete/setup_curso.asp?id="+document.frmGrid.IDRegistro[i].value; 
document.frmGrid.submit();

 }
 }
 if(!checkSelected){
 alert("Por favor, selecione um ou mais curso(s) para ser(em) excluído(s).");
 return false;
 }
 }
</script>

E este é o código da página que deleta.

'Delimita valores recebidos-----------------------------------------------------------------------
varIdOrigemUrl=TrataString(Request.QueryString("id"))
varSplit=Split(varIdOrigemUrl,",")
Dim iLoop 
For iLoop=LBound(varSplit) to UBound(varSplit)
varLote=Trim(varSplit(iLoop))

'Exclui registro(s) do banco de dados-------------------------------------------------------------
sqlDelete = "DELETE FROM CURSOS WHERE CURSOS.CursoCod='" & varLote & "'"
MM_conexao_STRING.Execute(sqlDelete)
Next

O que tem de errado??

Brigado!