2 Duvidas

[§uiciDa£]

ae galera eu tnho duas duvidas q eu sei qvcs matam de prima ;)

1ª - como q eu faço um search onde a pessoa digita somente o nome, ele te responde com o cadastro inteiro da pessoa (o cadastro esa no access)

2ª - Com o q eu faço um lugar para a pessoa editar sua conta tipo, ela colocou em e-mail na hra de cadastrat, masi agora quer colocar otro, pra ela editar...

entenderam ?

bom é so isso hehehe...

vlw pela força

[webdeveloper]

Tente isto, é só fazer os ajustes necessários:

mostra.asp

<%
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")

conStr = "Driver={Microsoft Access Driver (*.mdb)};Dbq="
conStr = conStr &"caminho_do_bd\nome_do_bd.mdb"
conn.Open conStr

sql = "Select * From nome_da_tabela Where nome_do_campo = '"& nome_digitado &"'"
rs.Open, conn, 3, 3
%>
<form action="atualiza.asp" method="post">
Nome:<input type="text" name="nome" value='<%=rs("nome")%>'><br>
E-mail:<input type="text" name="email" value='<%=rs("email")%>'><br>
<input type="submit" value="Atualizar">
</form>
<%
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>

atualiza.asp

<%
nome = Request.Form("nome")
email = Request.Form("email")

Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")

conStr = "Driver={Microsoft Access Driver (*.mdb)};Dbq="
conStr = conStr &"caminho_do_bd\nome_do_bd.mdb"
conn.Open conStr

sql = "Update nome_da_tabela Set nome_da_tabela.nome_campo_email = '"& email &"' Where nome_da_tabela.nome_campo_nome = '"& nome &"'"
rs.Open, conn, 3, 3

Response.Write "Cadastro atualizado com sucesso!"

rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>

Espero ter ajudado, qualquer dúvida volte a postar.

;)

[§uiciDa£]

ae cara o mostra.asp ta com o seguinte problema

"Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][Driver ODBC para Microsoft Access] Não foi possível encontrar o arquivo '(desconhecido)'.

/arteoral/search.asp, line 7

"

e o q q eu tnho q colocar na pagina atualizado.asp ?

a line 7 é

"conn.Open conStr"

[webdeveloper]

Onde está escrito "caminho_do_bd\nome_do_bd.mdb" é para você substituir pelo endereço e nome do seu banco de dados ex.:

c:\databases\bd1.mdb

[§uiciDa£]

mais o bd ta na mesma pasta e quando eu taco o nome do bd "members" da o mesmo erro

[Guest Aprendiz]

ae, tipo, substitui isso:

conStr = "Driver={Microsoft Access Driver (*.mdb)};Dbq="

conStr = conStr &"caminho_do_bd\nome_do_bd.mdb"

por isso:

conStr = "Driver={Microsoft Access Driver (*.mdb)};"

conStr = conStr &"dbq="& server.mappath("members.mdb") &""

agora deve funcionar direito...