Consulta

[Yoshi 1]

Age galera fmz??

é o seguinte to começando em asp ainda to fazendo um pequeno aplicativo com db em access

 

para inserir usei o seguinte comando

 

<%
Option Explicit
Response.Expires = 0
Dim objConn, objRs, strQuery, nome, apelido, idade, telefone, strDBPath
nome = request.form("nome")
apelido = request.form("apelido")
idade = request.form("idade")
telefone = request.form("telefone")
if nome = empty then
response.write "Por Favor Preencha o campo Nome"
response.end
END IF
%><P><%
if telefone = empty then
response.write "Por Favor Preencha o campo Telefone"
response.end
END IF
%><br><br><br><br><br><a href='index.asp'><font color="#000000" size="5">Voltar</font></a></p>
<%
if nome <> "" and telefone <> null Then
response.write "Dados Inseridos com sucesso"

end if

Set objConn =  Server.CreateObject("ADODB.Connection")
strDBPath = "e:\web\gabriel\teste\agenda.mdb"
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";"
strQuery = "INSERT INTO amigos (nome, apelido, idade, telefone) VALUES ('"&nome&"','"&apelido&"','"&idade&"', '"&telefone&"')"
On error Resume Next
Set ObjRs = objConn.Execute(strQuery)
objConn.close
Set objRs = Nothing
Set objConn = Nothing
%>

deu certo mais não estou conceguindo fazer consultas e nem deletar itens sera q algum pd me ajudar???

[Mário Monteiro 179]

qual o erro?

[Yoshi 1]

Tipow naum sei como montar a formula pra fazer a busca queria saber como eu faço issu

[Mário Monteiro 179]

Consultas voce usará SELECT e para deletar o DELETE

 

ainda nao consegui identificar exatamente o que precisa