spider_72

Entaum, testei tb o código mencionado e tb não deu certo, deu o mesmo erro, será que alguem sabe onde esta o erro?

Só que meu script esta um pouco diferente:

<%
nom = Request.form("nom")
rg = Request.form("rg")
ende = Request.form("ende")
bai = Request.form("bai")
cid = Request.form("cid")
est = Request.form("est")
cep = Request.form("cep")
tel = Request.form("tel")
dna = Request.form("dna")
ema = Request.form("ema")
eci = Request.form("eci")
pro = Request.form("pro")
opcao = Request.form("opcao")
opcao2 = Request.form("opcao2")
If ende = "" then ende = "Não Informado" End If
If bai = "" then bai = "Não Informado" End If
If cid = "" then cid = "Não Informado" End If
If est = "" then est = "Não Informado" End If
If cep = "" then cep = "Não Informado" End If
If dna = "" then dna = "Não Informado" End If
If ema = "" then ema = "Não Informado" End If
If eci = "" then eci = "Não Informado" End If
If pro = "" then pro = "Não Informado" End If
If opcao = "" then opcao = "Não Informado" End If
If opcao2 = "" then opcao2 = "Não Informado" End If

set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open(StringdeConexao)

ComandoSQL = "INSERT INTO caminhada (nom, rg, tel, ema, ende, bai, cid, est, cep, dnas, eciv, pro, opcao, opcao2) VALUES ('"&nom&"', '"&rg&"', '"&ende&"', '"&bai&"', '"&cid&"', '"&est&"', '"&cep&"', '"&tel&"', '"&dna&"', '"&ema&"', '"&eci&"', '"&pro&"', '"&opcao&"', '"&opcao2&"') "
Conexao.Execute ComandoSQL

O código deve mudar creio eu, podem me ajudar aí?

Ops, desculpe Linhares não havia atentado sobre o topico, e muito obrigado pela força, consegui resolver o problema.

acontece que a cada novo usuario que preenchesse o formulario teria que gerar um numero de inscrição que alias ja esta com o proprio ID em autonumeração

Utilize ele mesmo assim nao corre o risco de se repetir, após voce fazer a inserção dos dados do cadastro, recupere a posição dele no banco de dados, é uma alternativa.

<%
SQL = "Select ID From TABELA where Usuario ='" &Request.Form("Usuario")& "'"
Set rs = Conn.Execute(SQL)

NInscricao = rs("ID")
%>

[]'s

Generation, desculpe minha ignorancia. Pode me dizer o que devo colocar em Usuario= e request.Form

Esse campos acho que devo adaptar ao meu formulario certo?
Do jeito que está dá o seguinte erro:
Tipo de erro:
Microsoft JET Database Engine (0x80040E10)
Nenhum valor foi fornecido para um ou mais parâmetros necessários.

vc vai ter que usar algum linguagem dinamica ..... ASP por exemplo !!

Isso eu sei mas como devo programar, é muito complexo?Pode detalhar os codigos

Se estiver usando em um projetor exe no XP não funciona mesmo, e isso nem o pessoal da macromedia conseguiu me responder, agora se for num swf mesmo dê uma olhada no código pois é assim que faz e funciona.



t+

Olha eu não sei quanto a vocês mas aqui eu uso:

Flash MX
Windows XP Pro

criei o swf e o exe e deram certo os dois...

tá em aqui o linkdo projetor pra dá uma olhada

Otavio Boari

Boari, consegui chamar o Outllok depois que publiquei e gerei o HTM, mas em EXE. não consegui, como vc conseguiu?Explica aí?