Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Check box

Postades av 2001-09-18 12:53:00 - Raderat konto, i forum asp - allmänt, Tråden har 2 Kommentarer och lästs av 852 personer

Jag har en table som listar ut de poster som jag vill se. På varje rad finns ett check box. Om check box är inkliket, kan man klicka på en "Remove" knapp för att ta bort hela raden.

Hur kan man vetta vilka check box är inclickta?


Svara

Sv: Check box

Postades av 2001-09-18 13:25:00 - Per Morin

du kan ju pröva med detta
-------------------------------------------script----------------------------------
If Request("Id") <> "" Then
SQLStmt = "DELETE FROM Korg Where KorgId =" & Request("Id")
DB.Execute(SQLStmt)
End If


DO UNTIL RS.EOF
%><Label Value="<%= RS("Produktnamn") %>"></Label>
<b> <Label Value="<%= RS("Antal") %>">
<Label Value="<%= GetPrice() %>"> :-
<a href="beställning.asp?Id=<%= RS("KorgId") %>"><img src="delete.gif" alt="Radera" border="0" WIDTH="14" HEIGHT="13"></a
<%
SubTotal = SubTotal + (RS("Antal") * RS("Pris"))
RS.MoveNext

Loop
%>

-----------------------------script--------------------------------------------
Lite ommodifierad men du förstår principen
i Loopen så låter du ett (ID) följa med varje gång en ny produkt läggs upp när dom sedan trycker på ett X så försvinner det

MVH Per M


Svara

Sv: Check box

Postades av 2001-09-18 13:51:00 - Andreas Hillqvist

Du kan göra på följande sätt
<code>
<%
<FORM action="" method=post id=form1 name=form1>
<TABLE cellSpacing=1 cellPadding=1 width="100%" border=1>
<TR>
<TD>Text</TD>
<TD>Delete</TD></TR>
<%
Dim vTemp

Dim strIN
Dim strSQL

Dim conn
Dim rsTemp
Dim fldRecID
Dim fldText
Set conn= server.CreateObject("ADODB.Connection")
conn.Open "<<<Connection String>>>"

If Request.Form("Action") = "Delete" Then
If Request.Form(DeleteID).Count Then
For each vTemp In Request.Form(DeleteID)
strIN = strIN & ", " & vTemp
Next
strSQL = "DELETE FROM TabellNamn WHERE RecID IN (" & Mid(strIN, 3) & ")"
conn.Execute strSQL
End if
End If

Set rsTemp = conn.Execute("SELECT * FROM TabellNamn")

Set fldRecID = rsTemp("RecID")
Set fldText = rsTemp("fldText")

Do Until rsTemp.EOF
Response.Write " <TR>" & vbCrLf & _
" <TD>" & fldText & "</TD>" & vbCrLf & _
" <TD><INPUT type=checkbox name=DeleteID value=""" & fldRecID & """></TD></TR>" & vbCrLf
rsTemp.MoveNext
Loop

Set fldRecID = Nothing
Set fldText = Nothing

rsTemp.Close
Set rsTemp = Nothing

conn.Close
Set conn = Nothing
%>
<TR>
<TD></TD>
<TD><INPUT type=submit value=Delete name=Action></TD></TR></TABLE></FORM>
%>
</code>


Svara

Nyligen

  • 14:16 Indian online casino
  • 14:15 Indian online casino
  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 846
27 961
271 763
595
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies