[Resolvido] Update em vários registros

Olá moçada.

Preciso de uma ajuda.

estou tentantdo atualizar vários registros de uma só vez.

para isto estou usando o seguinte código:

id_userAt = request("id_userAt")

Nome = request("Nome")
tipo = request("tipo")
stato = request("stato")

pago = request("pago")
login = Replace(Request("login"),"'","")
senha = Replace(Request("senha"),"'","")

sql = "Update Users set tipo = "& tipo &", status_user = "& stato &", pago = "& pago &" where id_user in ("&id_userAt&") "
response.Write(sql)
ConexaoDB.Execute(sql)

O resultado do sql e o erro são estes:

Update Users set tipo = 1, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, status_user = 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, pago = 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1 where id_user in (3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 23, 24, 25, 28, 29)

Microsoft OLE DB Provider for SQL Server error '80040e14'

Incorrect syntax near '1'.

/cms/AdmU_atualiza.asp, line 35

A linha 35 se refere a isto: ConexaoDB.Execute(sql)

Alguém sabe?