Asp E Bd

[EDSONET]

Bom, o probelam é o seguinte:

Fiz um formulario, onde os dados são garavados(ou pelo menos deveriam ser) no BD que fica no mesmo diretorio.

Cadastra os dados neste BD, mais isso por algumas horas, do nada somem estes dados registrados.

Já fiz cadastros e logo depois olhava no BD e lá estavam os dados REGISTRADOS corretamente.

Algumas horas depois olho no BD e aqueles dados cadastrados já não estam mais lá!

Vou mostra o me código pra vc's e me digam se ah algo de errado ou se vc's tem algum tipo de solução.

logado.asp :

<%
'################################################
Set Conn = Server.CreateObject("AdoDb.Connection")
Conn.provider="Microsoft.Jet.OLEDB.4.0"
Conn.connectionstring=Server.Mappath("banco.mdb")
Conn.open

Dim nome, SQL, RS, conexao, asp

'################################################

If Request.Form("titulo") <> "" and Request.Form("cliente") <> "" and Request.Form("data_chamada") <> "" and Request.Form("data_atendimento") <> "" and Request.Form("hora_chamada") <> "" and Request.Form("hora_chegada") <> "" and Request.Form("hora_saida") <> "" and Request.Form("motivo_chamado") <> "" and Request.Form("servico_realizado") <> "" and Request.Form("atendido_por") <> "" then
        titulo = request.Form ("titulo")
        cliente = request.Form ("cliente")
  	data_chamada = request.Form ("data_chamada")
  	data_atendimento = request.Form ("data_atendimento")
  	hora_chamada = request.Form ("hora_chamada")
  	hora_chegada = request.Form ("hora_chegada")
  	hora_saida = request.Form ("hora_saida")
  	motivo_chamado = request.Form ("motivo_chamado")
  	servico_realizado = request.Form ("servico_realizado")
        atendido_por = request.Form ("atendido_por")
'############inicio código sql###################

	SQL = "insert into tb_atendimento"
	SQL= SQL & "(titulo,cliente,data_chamada,data_atendimento,hora_chamada,hora_chegada,hora_saida,motivo_chamado,servico_realizado,atendido_por)"
	SQL= SQL & "VALUES"
	SQL= SQL & "('"& titulo &"',"
	SQL= SQL & " '"& cliente &"',"
	SQL= SQL & " '"& data_chamada &"',"
	SQL= SQL & " '"& data_atendimento &"',"
	SQL= SQL & " '"& hora_chamada &"',"
	SQL= SQL & " '"& hora_chegada &"',"
	SQL= SQL & " '"& hora_saida &"',"
	SQL= SQL & " '"& motivo_chamado &"',"
	SQL= SQL & " '"& servico_realizado &"',"
	SQL= SQL & " '"& atendido_por &"')"

'################################################

  Set Rs = Conn.Execute(SQL)
  End If
%>

Pra mim esta "perfeito", mais agora vai fazer o que?!?!

Espero que me ajudem.

[Victor]

Poste o forumulário aqui, para que eu possa examinar os dados dos formulários!!!

[]'s

Victor

[EDSONET]

VICTOR MEU GRANDE CAMARADA, ERA COM você MESMO QUE QUERIA FALAR, SE LEMBRA DA MINHA DUVIDA DO E-MAIL COM ANEXO? É ESSE MESMO QUE você PODE ME AJUDAR. JÁ COLOQUEI O tópico ALI E PENSEI QUE você FOSSE ME AJUDAR...

ESTE DE FORMULARO JÁ ESTA RESOLVIDO...

AGRARDO RESPOSTA!

VLW

[dark0]

bom..

JÁ COLOQUEI O tópico ALI E PENSEI QUE você FOSSE ME AJUDAR....

esse tópico:

http://scriptbrasil.com.br/forum/index.php?showtopic=19787

ESTE DE FORMULARO JÁ ESTA RESOLVIDO

ok.. então tópico fechado!