ariesley

Gostaria de saber como imprimar na tela o número de resultados encontrados em uma busca no banco de dados??


Agradeço pessoal!

Como é que gravo por exemplo 50 registros de uma só vez em minha base de dados. Ex montei um código que vai me gerar e listar 50 senhas, mas como é que vou inserir em uma tabela esses 50 ítens de uma só vez???

VALEU PESSOAL!

Ao rodar o código a seguir aparece o seguinte erro:

error '80020009'
Ocorreu uma exceção.
/net/cadastra.asp, line 21

Alguém pode me ajudar!!!

<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit

Response.Expires = 0

Dim serie, serial, conexao, Rs, tabela, padrao, grava, exec

serie = Request.Form("serie")
serial = Request.Form("serial")
padrao="0"

Set conexao = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")

conexao.Open "DBQ=" & Server.MapPath("dados.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"

tabela = "SELECT * FROM base where serie='"&serie&"'"

rs.open tabela,conexao

If serie = rs("serie") then
Response.write("Serie ja cadastrada")
Else 
grava = "INSERT into base (serie, serial, situacao) VALUES ('"&serie&"','"&serial&"','"&padrao&"')"
Set exec=conexao.execute(grava)
if err = 0 then
Response.write("Cadastrado com sucesso")
end if
end if

%>

Pessoal alguém pode me dar uma força no seguinte erro:

Microsoft OLE DB Provider for ODBC Drivers error '80040e07' 

[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério. 

/net/grava.asp, line 39

Linhas com erro:

altera = "UPDATE base SET serie='"&a&"', serial='"&b&"', situacao='"&valor&"' WHERE cod='"&(cod)&"'"
set rs=conexao.execute(altera)

O arquivo completo está em anexo!

Desde já agradeço a todos!

Ola pessoal, uso o dreamweaver 2004, e gostaria de saber se tem algum recurso no dreamweaver que disabilite as barras de rolagem no meu site, ou só da para fazer inserido as informações no próprio código!

Desde já agradeço a todos!!!!