Ola galera estou com um problema em uma das minhas Function ela deveria fazer o Udate de dados de uma Tabela em MSSQL 2000 Private Function Editar() Dim SQL As String SQL = "UPDATE USUARIO SET(Nome=?,Cargo=?,Setor=?) WHERE ID=? VALUES(?,?,?,?)" With Comando .ActiveConnection = strConection .CommandType = adCmdText .CommandText = SQL .Execute , Array(txtuser(0).Text, txtuser(1).Text, txtuser(2).Text, ID) End With Set Comando = Nothing End Function So q ela da erro dizendo q nenhum valor foi fornecido para um ou mais parametros sendo q todos os TXTedit já estao preenchidos
