nao esta gravando no bd

[Morphman 0]

E ae...

Tenho um formulario para ser gravado em um bd access, mas na pagina "grava.asp" nao ocorre erro nenhum, e nem insere os dados no bd. !@

 

<% Option ExplicitDim sNumeroDim sProjetoDim sDataInicialDim sDataFinalDim sSQLDim ConexaoDim ConnStringsNumero = Request.Form("NumWO")sProjeto = Request.Form("Projeto")sDataInicial = Request.Form("DataInicial")sDataFinal = Request.Form("DataFinal")Set Conexao = CreateObject("ADODB.Connection")ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("wo.mdb") & ";Persist Security Info=False"Conexao.Open ConnString'Monta a Instrução SQLsSQL="Insert Into work (numero, projeto, inicial, final) Values (" & sNumero & ",'"  &  sProjeto & "','"  &  sDataInicial & "','"  &  sDataFinal & "' )"%>

HeLp !

[dimarcinho 0]

faltou você executar a instrução SQL

 

tenta assim:

 

<% Option Explicit

 

Dim sNumero

Dim sProjeto

Dim sDataInicial

Dim sDataFinal

Dim sSQL

Dim Conexao

Dim ConnString

Dim RS

 

sNumero = Request.Form("NumWO")

sProjeto = Request.Form("Projeto")

sDataInicial = Request.Form("DataInicial")

sDataFinal = Request.Form("DataFinal")

 

Set Conexao = CreateObject("ADODB.Connection")

ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("wo.mdb") & ";Persist Security Info=False"

Conexao.Open ConnString

 

Set RS = CreateObject("ADODB.RecordSet") 'criação do RecordSet

'Monta a Instrução SQL

sSQL="Insert Into work (numero, projeto, inicial, final) Values (" & sNumero & ",'" & sProjeto & "','" & sDataInicial & "','" & sDataFinal & "' )"

 

RS.Open sSQL, conexao, 3, 3 'usando o RecordSet para inserir os dados

 

Conexao.Close

Set Conexao = Nothing

Set RS = Nothing 'nunca eskeça de liberar a memoria dos objetos... assim, você alivia o servidor, e deixa a navegação para todos os usuários mais rápida!%>

 

o recordset eh um objeto usado para manipular os registros de um banco de dados via ASP....

 

espero ter ajudado !!!

 

[]´s

[Morphman 0]

opa, e ae... com esse codigo q você passou, ele gerou este erro

 

Tipo de erro:Microsoft JET Database Engine (0x80040E14)Erro de sintaxe na instrução INSERT INTO./Clientes/WO/grava1.asp, line 25