30. august 2005 - 20:51
Der er
22 kommentarer og 1 løsning
"Notat" i en "Access" db.?
Hey.. Kan man ikke: <% if rs("info") <> "" then %><% = rs("info") %><%End If%> Når "Datatypen" er sat til "Notat" i en "Access" db.? Kan ændre det til "Tekst" det ved jeg, men det begrænser det jo så en del det der kan stå. Er det en fiks måde man kan gøre det på, så man kan?
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
30. august 2005 - 21:12
#1
hmm det ville jeg da godt mene man kan, jeg ville nok stille det op på en anden måde, men det er jo en syns sag --- <% if rs("info") <> "" then response.write rs("info") end if %>
30. august 2005 - 21:34
#2
Ja det virker da totalt underligt at jeg ikke kan når jeg sætter Datatypen til "Notat". Kan heller ikke hvis jeg skriver det sådan som du gør..
31. august 2005 - 02:42
#3
Har du prøvet at skrive rs("info") ubetinget, altså uden if omkring? Hvad står der så? Giver den fejl eller står der bare ingenting? Kan det være fordi feltet er null?
31. august 2005 - 10:50
#4
softspot - Uden if sætningen virker den helt fint. Den udskriver det simpelhent overhoved ikke hvis if er på, ingen fejl medd, som om den bare ignorere den. Ja det står selvølgelig noget i feltet ;-) Lidt underligt, den gør, hvis jeg: <% if rs("info_about_player") <> "" then %> Hej <% = rs ("info_about_player") %><%End If%> smider et "Hej" indimellem, udskriver den "Hej", men ikke "<% = rs ("info_about_player") %>" *klør mig i håret.. hmm*
31. august 2005 - 10:53
#5
Hvad med at tjekke om feltet har en længde? if len(rs("info")) => 0 then else end if
31. august 2005 - 11:04
#6
hvad sker der hvis du refererer til value-egenskaben på field, altså: if rs("info").value <> "" then eller måske eksplicit konverterer til den til en string if cstr(rs("info")) <> "" then
31. august 2005 - 11:28
#7
softspot -- Den vil sgu heller ikke med det du skriver. Kaster lige det hele ind, så du kan se, hvis det hjælper. Det er "info_about_player", der driller. ---------- <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <meta http-equiv="Pragma" CONTENT="no-cache"> <link rel="stylesheet" href="../../../styles/styles.css" type="text/css"> <!-- <script> function content_top(skiftframe) { parent.content_top.location.href=skiftframe } </script> --> </head> <body rightmargin="0" bottommargin="0" scroll="auto"> <% Function FormatStr(String) on Error resume next String = Replace(String, CHR(10), "<br>") FormatStr = String End Function Set cn = Server.CreateObject("ADODB.Connection") OpenString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("../../../db/ubc/ubc_db.mdb") cn.Open OpenString if Request.QueryString("mode") = "delete" then cn.Execute "DELETE FROM tbl_membersOverview WHERE ID = " & Request.QueryString("ID") response.Redirect "membersOverview.asp" end if Set rs = cn.Execute("SELECT * FROM tbl_membersOverview WHERE ID = " & request("ID")) do while not rs.eof %> <table border="1" cellpadding="0" cellspacing="0" height="50%"> <tr> <td valign="top" width="270"><font class="defaulttext"> <b><% = rs("player") %></b> <br> <% = rs ("functionOfficials") %><% if rs("functionServer") <> "" then %> / <% = rs ("functionServer") %><%End If%> <br> <br> <b>Status:</b> <% = rs ("status") %> <br> <b>Date of recruitment:</b> <% = rs ("date_recruited") %> <% if rs("location") <> "" then %><br><b>Location:</b> <% = rs("location") %><%End If%> <% if rs("function1") <> "" then %><br><br><b><% = rs ("function1") %></b><%End If%> <% if rs("notice_leaving_and_date") <> "" then %><br><b>Left the clan:</b> <% = FormatStr(rs("notice_leaving_and_date"))%><%End If%></font></td> <td> </td> <td valign="top"><img src="pics/<% = rs("player_namepic") %>"><br><font class="defaulttext"><b><% = rs("irl_name") %></b></font></td> </tr> <tr> <td valign="top" colspan="3"><br><font class="defaulttext"><% if rs("info_about_player") <> "" then %> <% = FormatStr(rs("info_about_player")) %><%End If%></font></td> </tr> </table> <% rs.MoveNext loop rs.close cn.close %> </body> </html> ----------
31. august 2005 - 11:29
#8
Nederste "td"
31. august 2005 - 11:30
#9
Har også prøvet uden "FormatStr", virker heller ikke.
31. august 2005 - 11:33
#10
Et tåbeligt spørgsmål, men det er ikke fordi du har en style eller sådan noget der skjuler det tekst du skriver ud? Er teksten der heller ikke i sourcen (view source)?
31. august 2005 - 11:38
#11
2 sec., prøver lige at fjerne det
31. august 2005 - 11:40
#12
Du burde kunne se den i view source under alle omstændigheder hvis det er styling der giver problemer.
31. august 2005 - 11:40
#13
No.. hjalp heller ikke. i view sourse, skriver den bare: <tr> <td valign="top" colspan="3"><br></font></td> </tr> </table> så den "ser", slet ikke: <% if rs("info_about_player") <> "" then %> <% = FormatStr(rs("info_about_player")) %><%End If%>
31. august 2005 - 11:43
#14
Måske også underligt spm. Det kan ikke have noget med min ver. af Access? Det er en 2000. Eller, det er da vist den nyeste ver., ehmm.. tror jeg.
31. august 2005 - 11:51
#15
Office 2003 har en nyere version - velkommen til fremtiden ;) Nej, spøg til side. Kan du ikke prøve at skrive Response.Write("rs(""info_about_player"") har typen: " & TypeName(rs("info_about_player"))) bare for at se hvilken type den returnerer (altså om det er en string) Du kan også prøve at ændre din connectionstring til "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../../../db/ubc/ubc_db.mdb") (skyder lige med spredhagl :))
31. august 2005 - 12:05
#16
hehe.. tak tak :P .. lol Ja jeg er sgu lidt bagud, indrømmet *G* --- Ang. type så skriver den: rs("info_about_player") har typen: Field --- Og waaauw..*G*, det hjalp at ændre "connectionstring", den udskriver det nu :D Så skyd du bare med spredehagl ;) --- Og så er det så at jeg ligner lidt et spørgsmåltegn nu *G*, hvorfor virker det ikke med min/den anden connectionstring?
31. august 2005 - 12:10
#17
Din connectionstring angiver (indirekte) hvilken DLL/komponent på serveren der skal indlæses for at håndtere din forbindelse til databasen og den DLL som din connectionstring beder om har åbenbart problemer med det trick du beder den om at udføre, hvorimod den du indlæser med den nye connectionstring (forventeligt) er nyere og mere uptodate og kan altså håndtere det du beder om...
31. august 2005 - 12:10
#18
softspot -- Kan du iøvrigt genkende dit eget script: <% Set cn = Server.CreateObject("ADODB.Connection") OpenString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("../db/ubc_news.mdb") cn.Open OpenString if Request.QueryString("mode") = "delete_news" then cn.Execute "DELETE FROM news WHERE ID = " & Request.QueryString("ID") end if Set rs = cn.Execute("SELECT TOP 6 * FROM news ORDER BY dato Desc") do while not rs.eof %> --- Var dig der fiksede mode bla bla Delete, tingen for mig også ;) hehe
31. august 2005 - 12:13
#19
Hmm... genbrugte jeg ikke noget af det kode du havde vist i forvejen...? ;)
31. august 2005 - 12:13
#20
"nyere og mere uptodate" Ja jeg ER jo bagud ;) *G* Men tusinde tak for forklaringen, og hjælpen.. kanon :) Smider du et svar venligst :)
31. august 2005 - 12:14
#21
Du lavede: --- if Request.QueryString("mode") = "delete_news" then cn.Execute "DELETE FROM news WHERE ID = " & Request.QueryString("ID") end if Set rs = cn.Execute("SELECT TOP 6 * FROM news ORDER BY dato Desc") --- :)
31. august 2005 - 12:14
#22
Velbekomme :)
31. august 2005 - 12:19
#23
Tak for point :)
Kurser inden for grundlæggende programmering