code:

---

	$Connection 				= CreateObject("ADODB.Connection")
	$Connection.ConnectionString 	="Driver={Microsoft Access Driver (*.mdb)}; DBQ=\\server\kixexe$$\database\Radimus2000.mdb"
	$Connection.Open()
	If NOT @error	
	$Command    				= CreateObject("ADODB.Command")
	$Command.ActiveConnection 	= $Connection
	$Recordset  				= CreateObject("ADODB.Recordset")
	$Recordset.CursorType		= 3
	$Recordset.LockType			= 3
	$Recordset.ActiveCommand 	= $Command					
	$Command.CommandText 		= "UPDATE tbl_Users SET tbl_Users.Nombre='fart' where NtAccount='install'"

---