Jag håller på med en shop som kanske flera av er här inne redan vet. Jag vill att efter man valt att ta bort alla varor i kundvagnen ska det stå att "Kundvagnen är tom" Jag får det inte att fungera. Har skrivit följande:
%>
Du tog bort <%=sBesk%>
<%
If rs2.RecordCount = 0 Then
%>
<table><tr><td>Tomt i kundvagnen</td></tr></table>
<%
End If
rs2.Close
MinCon.close
End Sub
%>
När jag skrivit så här skrivs inte "Kundvagnen är tom " in. När jag sätter If rs2.RecordCount = 1 så skrivs
"kundvagnen är tom" ut när det det är ett plagg kvar.
Nån som har en lösning? Tycker att jag har testat alla kombinationer med <,>,=,>= osv. Nu börjar tålamodet tryta.
Jag kan väl lägga in hela koden för den suben. Tänkte att det kanske inte var så poppis men nu kommer den då:
Sub TaBort() 'Här böjar suben TaBort-------------------------------
set MinCon = Server.CreateObject("ADODB.Connection")
MinCon.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:/inl.mdb"
sql2 = "Select * FROM Temporder"
sql = "DELETE FROM Temporder WHERE ArtID = "& iArtNr &" and SessionID = "& sSession &""
Set rs2 = Server.CreateObject("ADODB.Recordset")
rs2.open sql2, MinCon,adOpenStatic,adLockOptimistic
MinCon.execute(sql)
%>
Du tog bort <%=sBesk%>
<%
If rs2.RecordCount = 0 Then
%>
<table><tr><td>Tomt i kundvagnen</td></tr></table>