Como Apagar Um Banco De Dados...

[Guest Cezar]

Tenho um script de contagem de clicks e quando eu peguei este script, já estava escrito no BD alguns exemplos de endereco como www.excite.com,

www.sas.com, www.aol.com e ainda o ip.

Como eu posso apagar isso deste banco, para que o script veja somente os links que eu colocar?

Por favor se algum puder me ajudar... eu ficaria grato.

Standard Jet DB µnb` ÂUé©gr@? œ~Ÿÿ…š1Åyºí0¼ßÌcÙäßFûŠ¼N»kì7`ÔœúûÎ(æ.&Š`i{6Èâß±JdCò?±3 nãoy[¯%|*jú|™˜ýr:ßøÛ9‚f_•øЉ$…gÆ'DÒîÏeíÿÇF¡xíé-bÔT 4.0 “ d »v @üóýÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÞ Y S Y Y Y

Y Y

Y

D þY Y

Y

Y ÿÿ Y a

Y d þ Y 2 þY Y Y j þY C o n n e c t D a t a b a s e D a t e C r e a t e D a t e U p d a t e

F l a g s F o r e i g n N a m e I d L v L v E x t r a L v M o d u l e L v P r o p N a m e

O w n e r P a r e n t I d R m t I n f o L o n g R m t I n f o S h o r t T y p e ƒ ÿÿ ÿÿnÿÿ ÿÿiÿÿ ÿÿ ÿÿ ÿÿ ƒ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ Y ÿÿÿÿ Y ÿÿÿÿ I d P a r e n t I d N a m e

ÿÿ üÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ© O Y C S Y Y Y Y 2 þ A C M F I n h e r i t a b l e O b j e c t I d S I D ƒ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿÿÿÿÿ A t ˆ Y ÿÿÿÿ O b j e c t I d ÿÿ ë

Y % S ã Y Y Y Y

Y þþ

Y þþY Y þþ A t t r i b u t e E x p r e s s i o n F l a g L v E x t r a

N a m e 1

N a m e 2 O b j e c t I d

O r d e r ƒ ÿÿ ÿÿnÿÿ ÿÿzÿÿ ÿÿfÿÿ

e d Y ÿÿÿÿ " O b j e c t I d A t t r i b u t e ÿÿ Ë - Y S Y Y Y

Y þ

Y þ

Y þ

Y þ

Y þ c c o l u m n

g r b i t i c o l u m n s z C o l u m n s z O b j e c t $ s z R e f e r e n c e d C o l u m n $ s z R e f e r e n c e d O b j e c t s z R e l a t i o n s h i p ƒ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ‚ ƒ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ‚ ƒ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ ÿÿ

‚ Y ÿÿÿÿ Y ÿÿÿÿ Y ÿÿÿÿ s z O b j e c t $ s z R e f e r e n c e d O b j e c t s z R e l a t i o n s h i p ÿÿ Y »v1ì§bØ

“

N

Ä:õ°k&á

œ

W

Í ˆ C þ¹t/ê¥ € € € $ $ @ @ € € @ @ € @ @ € @ OJmJJMMQkkfJUQk OJmJLJkQk Sdi`k `dOo^Qk iQ^JmYdbkWYfk iQfdimk kMiYfmk

kvkiQ^ mJL^Qk M^YM\k M^YM\k+Lv+OJv M^YM\k+Lv+Yf M^YM\k+Lv+`dbmW M^YM\k+Lv+oi^ `kvkJMMQkkdL[QMmk `kvkJMQk `kvkdL[QMmk `kvkhoQiYQk `kvkiQ^JmYdbkWYfk JMMQkk^Jvdom `kvkOL ko``JivYbSd okQiOQSYbQO

Q

@€ @€ @€

€ € € € € € Å @€ @€ @€ @€ @€ @€ @€ @€ ! " # $ % & ' ( ) * + , - . / 0 1 2 3 7 8 9

:

;

< @ A B

C

D

E€ € € € €

€ € € € € € € € € € 4€ 5€ 6

€ @ € @ € @ € @ € ÿ

b

^

[

\

]

_

`

a

ÿ } â Ý Ú Û Ü Þ ß à á ÿ ~

¼

Ï

Ì

Ê

Ë

Í

Î

ÿ ½

ÿ ½ = µd´_»

Z

ù˜7î¡T¼

_

e èkkÈö{ ÿÿ

€ hþú­ â@5ü­ â@

€

€ hþú­ â@÷º â@ c l i c k s _ b y _ i p ;Œm @ ! ¬ @ | @1 ^ R R F : : : : : : 8 ÿ` €

j–ÿŸâ@.涠â@ c l i c k s _ b y _ m o n t h ;Œè @ | @1 X L L @ @ @ @ @ @ @ > ÿ@

€ æ&ôfŸâ@ç±1 â@ c l i c k s _ b y _ d a y ;Œ2 @ + A @^ | @ ` T T H < < < < < < : ÿ` € Ä™8WŸâ@"šðD â@ c l i c k s _ b y _ u r l ;Œb @ ° @' | @ ` T T H < < < < < < : ÿ` € €V¢y·â@ø6Æ â@ A c c e s s L a y o u t ;Œ4 € MR2 € K e e p L o c a l

T  @ † z z : : : : : : : 8 ÿ@ Œ¹ky·â@J'¶·â@ c l i c k s ;Œñ @ : : : . . . . . . . , ÿ@ € ¥¤l·â@¥¤l·â@ D a t a A c c e s s P a g e s ;Œ@ @ @ @ @ @ @ @ @ @ > ÿ € ¥¤l·â@¥¤l·â@ S y s R e l ;Œ. . . . . . . . . . , ÿ € ¥¤l·â@¥¤l·â@ M o d u l e s ;Œ0 0 0 0 0 0 0 0 0 0 . ÿ € ¥¤l·â@¥¤l·â@ S c r i p t s ;Œ0 0 0 0 0 0 0 0 0 0 . ÿ € ¥¤l·â@¥¤l·â@ R e p o r t s ;Œ0 0 0 0 0 0 0 0 0 0 . ÿ € ¥¤l·â@¥¤l·â@ F o r m s ;Œ, , , , , , , , , , * ÿ € €ô΢l·â@ô΢l·â@ U s e r D e f i n e d ;ŒA @ D D D 8 8 8 8 8 8 8 6 ÿ@ € €!Z¡l·â@!Z¡l·â@ S u m m a r y I n f o ;ŒŒ @ D D D 8 8 8 8 8 8 8 6 ÿ@ ”W™l·â@œl·â@ M S y s A c c e s s O b j e c t s ;ŒD D D D D D D D D D B ÿ `u•l·â@`u•l·â@ €M S y s R e l a t i o n s h i p s :ŽD D D D D D D D D D B ÿ `u•l·â@`u•l·â@ €M S y s Q u e r i e s :Ž8 8 8 8 8 8 8 8 8 8 6 ÿ `u•l·â@`u•l·â@ €M S y s A C E s :Ž2 2 2 2 2 2 2 2 2 2 0 ÿ `u•l·â@`u•l·â@ €M S y s O b j e c t s :Ž8 8 8 8 8 8 8 8 8 8 6 ÿ `u•l·â@`u•l·â@ €M S y s D b ;Œ\ @ : : : . . . . . . . , ÿ@ `u•l·â@`u•l·â@ €R e l a t i o n s h i p s :Ž< < < < < < < < < < : ÿ `u•l·â@`u•l·â@ €D a t a b a s e s :Ž4 4 4 4 4 4 4 4 4 4 2 ÿ `u•l·â@`u•l·â@ €T a b l e s :Ž. . . . . . . . . . , ÿ F íÚÇ´¡Ž{hUB/¸AÊ

S

@

ɶ£,¢|ò

ß

Ì

¹

B

/

’ l Y âϼ©2ù‚o\IÒ¿¬™"ü…r_èÕÕÄÕÄÕÄÂK8%®›

€ÿþ :Œ

€ÿþ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿþ ;Œ

€ÿþ :Œ

€ÿþ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿþ ;Œ

€ÿþ :Œ

€ÿþ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿþ ;Œ

€ÿþ :Œ

€ÿþ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿþ ;Œ

ÿþ :Œ

ÿþ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

ÿþ ;Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ÿÿ :‰

€ÿÿ ;Œ

€ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

€ÿÿ :Œ

€ :Œ

€ :Œ

ÿÿ :Œ

ÿÿ 9HçÕBñ±§aÝÇ´ö}não^/,{:ŠÄ@sÄõnò9lÆ<ìX¥´±´ÞG{re‡"(™2ýÁf”€ÿº±óÊŠÅy:œÉ+não é?ÅÕÃE·MŽö8„íUŸÚóiZ´§p

ÿÿ ;Œ

ÿÿ :Œ

[Eddie_666]

Se for em Access, basta entrar no banco e apagar até manualmente. Ou então, usa um DELETE, mais ou menos assim: DELETE FROM tabela WHERE id = 10

Daí tu muda o where ali pra condição que tu quiser...

[caicai]

Cezar beleza

cara você pode utilizar esse sisteminha tb.

Ele mostra todo o conteudo da tabela e você seleciona o registro q quer apagar, poder ser um ou todos.

excluir.asp

<%

Option Explicit

Response.Expires = 0

Dim objConn, objRs, strQuery

Dim strConnection

'Conectando com o banco de dados banco.mdb

Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Open "DBQ=" & Server.MapPath("banco.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"

'Seleciona da tabela usuario

strQuery = "SELECT * FROM usuario"

Set ObjRs = objConn.Execute(strQuery)

%>

<html>

<head>

<title>:: Excluir Usuários ::</title>

</head>

<body bgcolor="#FFFFFF">

<form method="GET" action="excluir2.asp">

<table width="736" border="0" cellspacing="0" cellpadding="0" height="1">

<tr>

<td height="1" align="center" width="734">

<table border="0" width="740" height="63" cellpadding="2">

<tr bgcolor="#eeeeee">

<td width="22" height="1" align="center"> <font size="1" color="000000"><b><font face="Verdana">Nº:</font></b></font></td>

<td width="151" height="1" align="center"> <font size="1" color="000000"><b><font face="Verdana">Nome:</font></b></font></td>

<td width="162" height="1" align="center"> <font size="1" color="0000000"><b><font face="Verdana">E-mail:</font></b></font></td>

<td width="261" height="1" align="center"><font size="1" color="000000"><b><font face="Verdana"> IP:</font></b></font></td>

<td width="66" height="1" align="center"><font size="1" color="000000"> <input type="submit" name="Submit" value="Excluir"></font></td>

</tr>

<%While Not objRS.EOF %>

<tr bgcolor="#ffffff">

<td width="22" height="1" align="center"><div align="left"><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000">

<%Response.write objRS("id")%></font></b></font></div></td>

<td width="151" height="1" align="center">

<div align="left"><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000">

<%Response.write objRS("nome")%></font> </b></font></div></td>

<td width="162" height="1" align="center">

<div align="left"><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif"><a href="mailto:<%Response.write objRS("email")%>" class="menu"><%Response.write objRS("email")%></a></font></b></font></div></td>

<td width="261" height="1" align="center">

<div align="left"><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000"><%Response.write objRS("ip")%></font></b></font></div></td>

<td width="66" height="1" align="center">

<div align="center"><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000">

<input type="checkbox" name="checkbox" value="<%=objRS(0)%>"></font> </b></font></div></td>

</tr>

<%

'Movendo para o proximo registro

objRS.MoveNext

Wend

'Fechando as conexões

objRs.close

objConn.close

Set objRs = Nothing

Set objConn = Nothing

%>

excluir2.asp

<%

Option Explicit

Response.Expires = 0

Dim objConn, stringSQL, strConnection, array_id, i, sql_id, id

id = Request.QueryString("checkbox")

'Caso ocorra algum erro os precessos não são interrompidos

'e é passado para a próxima linha de comando

On error Resume Next

' Conectando com o banco de dados contato.mdb

Set objConn = Server.CreateObject("ADODB.Connection")

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

'Deletando registro da tabela contato onde esta a id

%>

<html>

<head>

<LINK REL=stylesheet HREF="liks_etc.css" TYPE="text/css">

<title>:: Ecluindo ::</title>

</head>

<body bgcolor="#FFFFFF">

<table width="100%" border="0" cellspacing="0" cellpadding="0">

<tr>

<td>

<%

if err = 0 and id <> "" then

array_id = split(id,",")

For i=0 to ubound(array_id)

sql_id = sql_id & "usuario.autonum = " & Trim(array_id(i)) & " OR "

'campo texto, então" & Trim(array_id(i)) & " OR "

'caso numerico '" & Trim(array_id(i)) & "' OR "

Next

sql_id = left(sql_id,(len(sql_id)-4))

stringSQL = "DELETE * FROM usuario WHERE "&sql_id&""

objConn.Execute(stringSQL)

objConn.close

Set objConn = Nothing

%>

<table border="0" width="100%" height="8" cellpadding="2" align="center">

<tr bgcolor="#0099FF">

<td colspan="7" height="1" align="center"> <font size="2" color="FFFFFF"><b><font face="Verdana, Arial, Helvetica, sans-serif">Usuário(s) excluido(s) com sucesso!</font></b></font> </td>

</tr>

</table>

<%else%>

<div align="center"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Ocorreu algum erro!<br>Nenhum dado foi excluido!</b><br><a href="java script:history.back(-1)">Volta</a></font></div>

<%End if%>

</td>

</tr>

</table>

</body>

</html>

é só fazer as modificações necessarias.

T+