Ir para conteúdo
Fórum CódigoFonte.net

razstec

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

  1. Pois eu precisava mesmo era de uma conta gratuita que suportasse asp, msaccess e tivesse cdonts activo.
  2. razstec

    Db Delete

    Ando aqui perdido se alguem me der umas luzes agradecia, tenho esta tabela e queria por a frente de cada registo 1 butao para apagar e outra para editar. alguem me pode ajudar? o codigo e este: <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Nome</title> <form name="inscoment" method="POST" id="inscoment" font color="#FFFFFF" > </head> <% cod=request.querystring("cod") set conn = CreateObject("ADODB.Connection") conn.Provider = "Microsoft.Jet.Oledb.4.0" conn.Open Server.MapPath("db/dbpm.mdb") set rs=server.createobject("adodb.recordset") inscoment="select * from karaoke" rs.open inscoment,conn,1 %> <% request.querystring("cod") if rs.recordcount > 0 then %> <body bgcolor="#FFFFFF" text="#000000"> <form method="POST" name="select"> <div style="position: absolute; top: 23px; left: 126px; width: 779px; height: 22px; z-index: 9" align="center"> <table border="0" id="table1" width="663"> <tr> <% cor="#5A9DFF" for j=1 to rs.recordcount %> <td text=black bgcolor="#<%=cor%>" width="75" bordercolor="#C0C0C0">Titulo</td> <td text=black bgcolor="#<%=cor%>" align="left"><%=rs.Fields("titulo")%></td> </tr> <% rs.movenext if cor="#5A9DFF" then cor="9999ff" else cor="#5A9DFF" end if next end if %> </table> </div> </form> </body> </html>
×
×
  • Criar Novo...