ai gente eu tava mexendo num codigo.... pra tentar fazer um news e tava apenas começando... e tipo ta dando erro no codigo... vou colocar aki para vocês observarem
<html>
<head>
<title> Apagar News </title>
</head>
<body bgcolor="white" text="black">
<%
Dim conexao
Dim rsDelNews
Dim strSQL
Dim lngRecordNo
lngRecordNo = CLng(Request.QueryString("ID"))
set conexao = Server.CreateObject ("ADODB.Connection")
caminho=server.MapPath("db.mdb")
conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&caminho&";"
set rsDelNews = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT news.*FROM news WHERE ID_no="&lngRecordNo
rsDelNews.LockType=3
rsNews.Open strSQL, conexao
rsDelNews.Delete
rsDelNews.Close
rsDelNews = Nothing
Set conexao = Nothing
Response.redirect "delete_db.asp"
%>
</body>
</html>
E quando eu vou abrir a pagina da o seguinte erro...
Pergunta
HellMaster
ai gente eu tava mexendo num codigo.... pra tentar fazer um news e tava apenas começando... e tipo ta dando erro no codigo... vou colocar aki para vocês observarem
<html> <head> <title> Apagar News </title> </head> <body bgcolor="white" text="black"> <% Dim conexao Dim rsDelNews Dim strSQL Dim lngRecordNo lngRecordNo = CLng(Request.QueryString("ID")) set conexao = Server.CreateObject ("ADODB.Connection") caminho=server.MapPath("db.mdb") conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&caminho&";" set rsDelNews = Server.CreateObject("ADODB.Recordset") strSQL = "SELECT news.*FROM news WHERE ID_no="&lngRecordNo rsDelNews.LockType=3 rsNews.Open strSQL, conexao rsDelNews.Delete rsDelNews.Close rsDelNews = Nothing Set conexao = Nothing Response.redirect "delete_db.asp" %> </body> </html>E quando eu vou abrir a pagina da o seguinte erro...
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/zackworld/deletar_db.asp, line 27
Se alguém puder me ajudar eu agradeço muito
[]s
HellMaster
Link para o comentário
Compartilhar em outros sites
10 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.