Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

slocun

como inserir dados na BD

Recommended Posts

Boas Pessoal!!

 

eu estou outra vez com problema na inserção de dados na BD.

 

estou a trabalhar em asp.net apartir do web developer do visual studio 2008 e o meu código começou a dar erro de novo, tentei alterar para corrigir mas nada, fico na esperança que alguém me possa dar uma ajudinha!

 

ponto de situação: ---> a ligação com a BD já está feita, e sem problemas, penso k o erro é nas queries.

<%@ Page Language="VB" aspcompat=true Debug="true"%>
<configuration>
   <system.web>
	   <compilation debug="true"/>
   </system.web>
</configuration>
<html>
<head>
<title>Inserir.aspx</title>
</head>
<body bgcolor="#B9DCFF" style="background-attachment: fixed">
<br>
<div align="center"><img border="0" src="file:///F:/ESTAGIO_TIAGO/access/gest.bmp" width="548" 
height="155"></div>
<%  Dim Conn, sSQL, RS, RX, xSQL, nome, telefone
	nome = Request.Form("nome")
	telefone = Request.Form("telefone")
	
	Conn = Server.CreateObject("ADODB.Connection")
	Conn.Open("GestrofaBD")
	xSQL = "Select * From Cliente WHERE Nome = '" & nome & "' AND Telefone = '" & telefone & "'"
	RX = Conn.Execute(xSQL)
	If RX.eof Then
		sSQL = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')"
		RS = Conn.Execute(sSQL)
	Else%>
		<html>Dados já existentes!<br>Nome ou Telefone já registados dentro da base de dados.</html>
	<%End If%>
<br>
<br>
<br>
<br>
<h1><div align="center">Registro Inserido</div></h1>
<br><br><br><br><br><br><br><br><br><br><br><br><br>
<div align="center">Clique <a href = "inserir.html">aqui</a> para voltar.</div>


<%
Conn.Close
%>
<body>
<html>
agradeço toda a ajudar...

cumps! :)

Compartilhar este post


Link para o post
Compartilhar em outros sites

O campo telefone é do tipo Char?

o erro é o seguinte:

 

[Microsoft][Controlador Microsoft Access de ODBC] Tipo de dados incorrecto na expressão de critérios.

 

Linha 17: Conn.Open("GestrofaBD")

Linha 18: xSQL = "Select * From Cliente WHERE Nome = '" & nome & "' AND Telefone = '" & telefone & "'"

Linha 19: RX = Conn.Execute(xSQL)

Linha 20: If RX.eof Then

Linha 21: sSQL = "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "', '" & telefone & "')"

-----------------------

 

eu já declarei a variavel telefone como "long" (dim telefone as long)

mas deu erro na mesma, embora à uns dias atras o erro seria esse e depois ao declara-la como long deixou de dar o erro, mas agora voltou e ja não sei porque...

 

cumps

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.