/ Forside/ Teknologi / Udvikling / VB Scripts / Spørgsmål
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB Scripts
#NavnPoint
technet 385
MouseKeep.. 300
Dark_Magi.. 250
Harlekin 200
AntonV 200
natmaden 200
EXTERMINA.. 200
gandalf 160
smorch 139
10  strarup 110
undlad rækker i database
Fra : Maddog_dk
Vist : 913 gange
200 point
Dato : 14-05-09 08:06

Hej

Jeg håber virkelig at der er en som kan hjælpe mig herinde.

Jeg skal importere data fra en access database, hvilket også fungere og der har jeg "bygget" et søgning felt ind, så man kan søge på 5 ud af 10 kollonner.
Jeg har en kollonne der hedder status, og hvis værdien i denne kollonne er = 1 må den pågældende række visses, men hvis værdien er = 0 skal rækken være skjult - er det muligt

Jeg har prøvet med dette:

<% if ("Status") = 1 then %>
<%= rs("Country") %>
<% end if %>

men uanset om værdien i "Status" er = 1 eller 0 vises rækkerne
nogle ider der kan afhjælpe problemet?


PFT



 
 
Kommentar
Fra : evilfish


Dato : 15-05-09 08:52

Skal du bruge din "status" kolonne i den pågældende situation? Og kan man få lov at se din SQL query?

Kommentar
Fra : Maddog_dk


Dato : 15-05-09 10:32

Hej evilfish


Jeg skal kun bruge "status" kolonnen i den pågældende situation, input hertil kommer direkte fra vores ordre system som er C5.

her er hele scriptet, jeg har en anden søgefuktion indbygget den er dog ikke med i udsnittet herunder:

accessdb="EMC5"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")

sql = "select * from PANDORA where " & u_where &" like '"& u_search & "'"

rs.Open sql, cn
If rs.eof then
search="nothing"
end if
%>

<head>

<title><%= sql %></title>
<p>
<%= sql %>
</p>


<% if search <> "nothing" then %>

<div align="left">
<table cellspacing="0" class="style20" cellpadding="0" style="width: 880px">
<tr class="style19">
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Country</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">City</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Shop
<br>
format</font></th>
<th width="200" valign="top" align="left" class="style20" ><font face="Arial" size="1">Delivery address</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Order No.</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Status</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Shipping date</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Expected finish</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Opening date</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Go
to project</font></th>
<th width="60" valign="top" align="left" class="style20" ><font face="Arial" size="1">Ordering</font></th>
</tr>
<% end if %>
<%
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
%>
<tr class="style19">
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Country") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("City") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Shop_format") %></font></td>

<td width="200" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Delivery_address") %></font></td>



<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Order_No") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Status") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Shipping_date") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Expected_finish") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Opening_date") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Go_to_project") %></font></td>
<td width="60" valign="top" align="left" class="style20" style="height: 27px">
<font face="Arial" size="1">
<%= rs("Ordering") %></font></td>

<%
rs.MoveNext
loop%>

<% if search = "nothing" then %>
<div align="left">
<table border="0" cellpadding="0" cellspacing="0" width="840">
<tr>
<td valign="top" align="left">
<font face="Arial" size="2">
No Search Results Matched <%= u_search %></font></td>
</tr>

<% end if %>

Her er det så jeg gerne skulle have den til at fravælge de linie hvor værdien er = 0
værdien findes i ovenstående database i kolonnen Status og er angivet til enten 1 eller 0

hvordan pokker får man det integreret i ovenstående kode??????


Kommentar
Fra : evilfish


Dato : 15-05-09 10:46

Altså personligt vil jeg ændre en query, således at den fravælger alle rækker hvor status er 0, ved at lave en ekstra WHERE validering der hedder "AND Status=0".

1: Du slipper for at validere status så scriptet kører hurtigere
2: Langt mindre netværks traffik

Hvis du så skal have en situation hvor status 0 også skal vises kan du skifte mellem 2 queries som henholdsvis har og ikke har valideringen "AND Status=0" i sig.

Kommentar
Fra : Maddog_dk


Dato : 15-05-09 10:50

Hej evilfish

er det på denne måde du mener:

<%= rs("Order_No") "AND ("Status") =0" %>


eller kan jeg lokke dig til at give et eksempel?




Kommentar
Fra : Maddog_dk


Dato : 15-05-09 12:18

er dette en mulighed?

<%
u_search=request.form("u_search")
u_where=request.form("u_where")
if u_search = "" or u_where= "" then
response.write "no data was keyed"

end if


accessdb="EMC5"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")

sql = "select * from PANDORA where " & u_where &" like '"& u_search & "'" AND WHERE OR_Status = 1

rs.Open sql, cn
If rs.eof then
search="nothing"
end if
%>


Kommentar
Fra : Maddog_dk


Dato : 15-05-09 12:19

HAR RETTET "STATUS" TIL "OR_STATUS"

Kommentar
Fra : Maddog_dk


Dato : 16-05-09 20:06

Hej

jeg har virkelig brug for lidt input, så jeg kan prøve nogle nye forsøg.....

Er der ikke en som har et forslag, alt er velkommen - jeg er klar til at prøve alt af for at se om det virker!!!!!!!!!!!!

/maddog

Kommentar
Fra : Maddog_dk


Dato : 18-05-09 11:41

Hvad er der galt i denne linie?

sql = "select * from PANDORA where ("OR_Status")=1 and " & u_where &" like '"& u_search & "'"

jeg vælger alt fra PANDORA db hvor kolonnen OR_Status har en værdi 1 og hvor de øvrige søge parameter er opfyldt.

hvis jeg fjerne ("OR_Status")=1 and virker scriptet, men jeg vil gerne undlade alle linier hvor OR_Status ikke er = 1




Accepteret svar
Fra : emhauge

Modtaget 200 point
Dato : 18-05-09 11:57

prøv det her

sql = "select * from PANDORA where OR_Status = 1 and " & u_where &" like '"& u_search & "'"


Kommentar
Fra : Maddog_dk


Dato : 18-05-09 12:01

Perfekt, Tak

jeg har det samme spørgsmål under ASP smid lige en kommentar der og få flere point......

Godkendelse af svar
Fra : Maddog_dk


Dato : 18-05-09 12:02

Tak for svaret emhauge.

Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177577
Tips : 31968
Nyheder : 719565
Indlæg : 6409070
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste