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	0	07/11/202415:34	-
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

22/11

Test: Den snusfornuftige Volkswagen ID.3 blevet til lidt af el-bisse

22/11

Vil købe tele-løsninger til det offentlige for 370 millioner kroner

22/11

Nørgaard: Det er de neuro-divergente originalers tid

22/11

Sker helt åbenlyst: Ansatte i den kinesiske stat sælger borgernes personlige data på hemmelige internet-fora

22/11

Efterspørgslen på AI-regnekraft er enorm - og det smitter af på priserne: "Vi kan sælge næsten alt, hvad vi får ind"

22/11

Derfor bliver den amerikanske tvangs-opdeling af Google nok ikke til noget

22/11

Nyt værtøj fra Microsoft: Snart kan du reparere nedbrudte Windows-enheder på distancen

22/11

Vi har fundet 10 ledige it-stillinger, som du kan søge netop nu

22/11

Politiet skriver kontrakt på 75 millioner kroner med dansk it-firma: Medarbejdere skal flytte ind hos politiet

22/11

Kombit gør klar til at købe it-konsulenter for 140 millioner kroner - her er planen

22/11

Droner i krig - sådan anvendes de mest effektivt på slagmarken

Vis flere artikler

IT-JOB

ATP

Erfaren Data Engineer til ATP Data Foundation

Education Esbjerg

Systemadministrator – form IT-fundamentet for fremtidens uddannelsesby

Netcompany A/S

Test Specialist

MAN Energy Solutions

Full Stack Developer

KMD A/S

Senior Project Manager

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

7 min siden	Underlig meddelelse på skærmen Af Jordegern i E-mail programmer
I dag 15:56	Navigation i Peugeot 3-2008 fra 2017 Af arnepedersen i Andet software
I dag 14:10	Outlook henter ikke mails Af TTA i Office & Kontorpakker
I dag 13:58	vise billeder i kartotek med store ikoner inklusive optagelsesdato Af Malm i Billedbehandling
I dag 13:35	Adobe Elements 2019, Organizer Crasher Af mort1 i Billedbehandling