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


Sökning

Postades av 2002-06-13 13:29:44 - Jimmy Nilsson, i forum asp - allmänt, Tråden har 2 Kommentarer och lästs av 364 personer

<code>

Vad gör jag för fel, ska göra en sökning med hjälp av en kombibox i antingen artikelkod eller beskrivning kolumnen men även om jag markerar beskrivning i kombiboxen på sidan före så söker den på artikelkod.
<%
Dim artsok, sokord, SQL, RS, RS2

artsok = Request.Form("artsok")
sokord = Request.Form("sokord")

If Request.Form("artsok") = Artikelnummer Then


SQL = "SELECT * FROM ""ARTIKELREGISTER"" WHERE ""DE_CHSHuvudprislista"" ='Y' AND ""DE_CHSArtikelkod"" LIKE '" & sokord & "%'"
Set RS = Conn.Execute(SQL)
Response.Write SQL


' Kollar om sökningen finns i databasen annars skriver den ut Response.Write
If RS.EOF Then

Response.Write "<center><div>Sökningen på <b>" & sokord & "</b> gav inga träffar.</center>"
Else
%>
<table border="0" width="700">
<%
Do Until RS.EOF

Response.Write "<tr><td bgcolor=#66CCFF><div>Artikelnummer</td><td bgcolor=#66CCFF><div>Beskrivning</td><td bgcolor=#66CCFF><div>Listpris SEK/st</td><td bgcolor=#66CCFF><div>Rabatt %</td><td bgcolor=#66CCFF><div>Netto SEK/st</td><td bgcolor=#66CCFF><div>Lev tid</td>"
Response.Write "<tr><td><div>" & RS("DE_CHSArtikelkod") & "</td><td><div>" & RS("DE_Beskrivning") & "</td><td><div>" & RS("DE_CHSListpris") & "</td><td><div>-</td><td><div>-</td><td><div>-</td>"


RS.MoveNext
Loop

End If

%>
</table>
<table border=0 width="700">
<%
Else

SQL = "SELECT * FROM ""ARTIKELREGISTER"" WHERE ""DE_CHSHuvudprislista"" ='Y' AND ""DE_Beskrivning"" LIKE '" & sokord & "%'"
Set RS2 = Conn.Execute(SQL)


' Kollar om sökningen finns i databasen annars skriver den ut Response.Write
If RS2.EOF Then

Response.Write "<center><div>Sökningen på <b>" & sokord & "</b> gav inga träffar.</center>"
Else

Do Until RS2.EOF

Response.Write "<tr><td bgcolor=#66CCFF><div>Artikelnummer</td><td bgcolor=#66CCFF><div>Beskrivning</td><td bgcolor=#66CCFF><div>Listpris SEK/st</td><td bgcolor=#66CCFF><div>Rabatt %</td><td bgcolor=#66CCFF><div>Netto SEK/st</td><td bgcolor=#66CCFF><div>Lev tid</td>"
Response.Write "<tr><td><div>" & RS2("DE_CHSArtikelkod") & "</td><td><div>" & RS2("DE_Beskrivning") & "</td><td><div>" & RS2("DE_CHSListpris") & "</td><td><div>-</td><td><div>-</td><td><div>-</td>"

RS2.MoveNext
Loop
End If
End If
%>
</code>

Tackar hjärtligast för all hjälp!


Svara

Sv: Sökning

Postades av 2002-06-13 13:36:31 - Sara Winter

Har du testat att istället för att bara skriva 'Else' lägga till villkoret, 'else if ...'?

En till sak, är Artikelnummer en variabel? Borde du kanske inte sätta fnuttar omkring den om den inte är det (jag är inte säker på att det behövs)?

If Request.Form("artsok") = "Artikelnummer" Then


Svara

Sv: Sökning

Postades av 2002-06-13 13:49:09 - Jimmy Nilsson

Det funkade med ElseIf Request.Form = "beskrivning"

Lade till "" också men det är ingen variabel med det verkar fungera, ElseIf har jag testat innan men inte med""

tackar för hjälpen


Svara

Nyligen

  • 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
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

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 831
27 960
271 761
3 562
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