CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

pro Nybegynder

24. marts 2004 - 22:03 Der er 20 kommentarer og
1 løsning

Hvis ingen værdi - brug standard værdi

Hej Eksperter...

Jeg skal bruge en streng der fortæller at hvis der i min access databases kolonne der hedder "billed" ikke står nogen værdi, skal der udskrives "nopic.jpg"!

Hvordan gøres dette? Jeg er ikke en haj til det, så hvis nogen vil skrive det direkte ind i koden ville jeg blive glad.

Her er koden:

<%
if request.querystring("id") = "" then
response.redirect("index.asp")
end if

Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = server.CreateObject("ADODB.Recordset")
DBSti = "DBQ=" & Server.Mappath("mad.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
sql = "SELECT * FROM opskrifter WHERE ID = " & request.querystring("id")
set record = conn.execute(sql)
ny_visning = record("visninger") + 1
sql2 = "Update opskrifter set visninger = '" & ny_visning & "' where ID = " & record("id") & ""
conn.execute(sql)
%>

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:07 #1

Jeg ved ikke helt hvor du vil havde det ind, men du kan bruge:

if Len("" & record("billed")) = 0 then
Response.Write "nopic.jpg"
end if

Synes godt om

pro Nybegynder

24. marts 2004 - 22:15 #2

Det kan jeg ikke rigtigt få til at virke! Her er hvad der bliver skrevet:
http://www.net-opskrifter.dk/vis.asp?id=260

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:18 #3

hmm hvordan har du fået de sat ind, den påstår der mangler end if?

Synes godt om

pro Nybegynder

24. marts 2004 - 22:19 #4

Nu står det sådan her:

<%
if request.querystring("id") = "" then
response.redirect("index.asp")
end if

If Len("" & record("billed")) = 0 then Response.Write "nopic.jpg"
End If

Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = server.CreateObject("ADODB.Recordset")
DBSti = "DBQ=" & Server.Mappath("mad.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
sql = "SELECT * FROM opskrifter WHERE ID = " & request.querystring("id")
set record = conn.execute(sql)
ny_visning = record("visninger") + 1
sql2 = "Update opskrifter set visninger = '" & ny_visning & "' where ID = " & record("id") & ""
conn.execute(sql)
%>

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:23 #5

Først hvis du skriver det ud i en linje if xx then yyy så skal der ikke være End If
Samt det skal efter du har hendtet fra databasen sådan her:

<%
if request.querystring("id") = "" then
response.redirect("index.asp")
end if

Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = server.CreateObject("ADODB.Recordset")
DBSti = "DBQ=" & Server.Mappath("mad.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
sql = "SELECT * FROM opskrifter WHERE ID = " & request.querystring("id")
set record = conn.execute(sql)
If Len("" & record("billed")) = 0 then Response.Write "nopic.jpg"

ny_visning = record("visninger") + 1
sql2 = "Update opskrifter set visninger = '" & ny_visning & "' where ID = " & record("id") & ""
conn.execute(sql)
%>

Synes godt om

pro Nybegynder

24. marts 2004 - 22:31 #6

Jeg tror jeg forklarer mig forkert eller gør noget forkert! For nu skriver den som du kan se på ovennævnte link "nopic.jpg".

Det der skulle være sket er at det billed der ikke virker, skulle have været skiftet ud med det billed det hedder "nopic.jpg"

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:37 #7

Så der skal gemmes "nopic.jpg" i databasen?

Synes godt om

pro Nybegynder

24. marts 2004 - 22:40 #8

Nej det foregår på den måde at når en opskrift bliver tilføjet står "billed" rubrikken tom - den skal jeg indskrive manuelt.

Hvis jeg så IKKE har indskrevet noget, skal den bruge det billed der hedder nopic.jpg.

Der hvor billedet bliver vist står der <%= record("billed") %> hvis det hjælper ??

Synes godt om

pro Nybegynder

24. marts 2004 - 22:45 #9

Nu sidder jeg lige og forestiller mig at der hvor der står <%= record("billed") %> skal der måske stå noget i retningen af <%= If Len("" & record("billed")) = 0 then Response.Write "nopic.jpg" else write record("billed") %>

Jeg ved strengen ikke passer men du kan måske fortælle mig hvordan den skal stykkes sammen??

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:48 #10

ok når ja der skal også lige <img> tag omkring

<%
If Len("" & record("billed")) = 0 then
Response.Write "<img src=""nopic.jpg"">"
else
Response.Write "<img src=""" & record("billed") & """>"
End if
%>

Synes godt om

pro Nybegynder

24. marts 2004 - 22:55 #11

Så får jeg en invalid caracter!?

Samme link...

Synes godt om

eagleeye Praktikant

24. marts 2004 - 22:59 #12

hmm prøv at vise koden igen det forstår jeg ikke??

Synes godt om

pro Nybegynder

24. marts 2004 - 23:00 #13

Dette er FØR <html> tagget:

<%
if request.querystring("id") = "" then
response.redirect("index.asp")
end if

Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = server.CreateObject("ADODB.Recordset")
DBSti = "DBQ=" & Server.Mappath("mad.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
sql = "SELECT * FROM opskrifter WHERE ID = " & request.querystring("id")
set record = conn.execute(sql)

ny_visning = record("visninger") + 1
sql2 = "Update opskrifter set visninger = '" & ny_visning & "' where ID = " & record("id") & ""
conn.execute(sql)
%>

Dette er fra hvor billedet skulle udskrives:

<%
If Len("" & record("billed")) = 0 then
Response.Write "<img src=""nopic.jpg"">"
else
Response.Write "<img src=""" & record("billed") & """>"
End if
%>

Synes godt om

eagleeye Praktikant

24. marts 2004 - 23:09 #14

Det kan jeg ikke se noget galt i...
Det forstår jeg ikke helt hvad der går galt.

Synes godt om

pro Nybegynder

24. marts 2004 - 23:23 #15

Ja nu har jeg fået det til at virke på de opskrifter hvor rubrikken er TOM (der måtte ikke være mellemrum foran Response...)

Men nu virker der ikke på de opskrifter hvor rubrikken IKKE er tom! Som på f.eks. http://www.net-opskrifter.dk/vis.asp?id=207

Synes godt om

eagleeye Praktikant

24. marts 2004 - 23:25 #16

Der mangler et " i den linje før & record("billede")

Synes godt om

eagleeye Praktikant

24. marts 2004 - 23:29 #17

jeps sådan, men nu kommer der et findes ikke ikon frem. Det kan være pga. du skal havde angivet stien til billedet hvis ikke det ligger i samme folder som .asp filen?

Synes godt om

pro Nybegynder

24. marts 2004 - 23:30 #18

Det forstår jeg ikke...?? Sådan her??

<%
If Len("" & record("billed")) = 0 then
Response.Write "<img border='1' src=""images/nopic.jpg"">"
else
Response.Write "<img border='1' src="""" & record("billed") & """>"
End if
%>

Eller hvordan??

Synes godt om

eagleeye Praktikant

24. marts 2004 - 23:30 #19

det var rigtig som du havde lavet det :)

Response.Write "<img border='1' src=""" & record("billed") & """>"

for at udksrive en " skal man skrive to "" efter hinanden

Synes godt om

pro Nybegynder

24. marts 2004 - 23:33 #20

AAAHHHH.... NU virker det :-)

Jeg havde glemt at skrive ""images/" (DOooh)

Mange tak for hjælpen, det havde jeg aldrig fundet ud af uden din hjælp! :-)

Smid lige et svar! Og fortsat god aften/nat...

Synes godt om

eagleeye Praktikant

24. marts 2004 - 23:34 #21

Ok her et svar :)
Jo tak og godnat til dig.

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS