VIDA SIMPLES - CONTROLE DE PROPOSTA

<% Set Database = Server.CreateObject("ADODB.Connection") Database.Open StringConexao Dim wID, wNome wID=Numera("VEN") wNOME=request.item("Nome") 'wCA_USUARIO=request.item("Ca_Usuario") wCA_USUARIO="Admin" SQL= "INSERT INTO VENDEDORES(ID, NOME, CA_USUARIO) VALUES (" & wID & ",'" & wNOME & "','" & wCA_USUARIO & "')" Set TabVendedores = Database.Execute(SQL) %>

Vendedor cadastrado com Sucesso!