Avatar billede karstenl Nybegynder
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?
Avatar billede busschou Praktikant
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
%>
Avatar billede karstenl Nybegynder
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..
Avatar billede softspot Forsker
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?
Avatar billede karstenl Nybegynder
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*
Avatar billede mini-me Nybegynder
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
Avatar billede softspot Forsker
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
Avatar billede karstenl Nybegynder
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>&nbsp;&nbsp;</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>
----------
Avatar billede karstenl Nybegynder
31. august 2005 - 11:29 #8
Nederste "td"
Avatar billede karstenl Nybegynder
31. august 2005 - 11:30 #9
Har også prøvet uden "FormatStr", virker heller ikke.
Avatar billede softspot Forsker
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)?
Avatar billede karstenl Nybegynder
31. august 2005 - 11:38 #11
2 sec., prøver lige at fjerne det
Avatar billede softspot Forsker
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.
Avatar billede karstenl Nybegynder
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%>
Avatar billede karstenl Nybegynder
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.
Avatar billede softspot Forsker
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 :))
Avatar billede karstenl Nybegynder
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?
Avatar billede softspot Forsker
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...
Avatar billede karstenl Nybegynder
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
Avatar billede softspot Forsker
31. august 2005 - 12:13 #19
Hmm... genbrugte jeg ikke noget af det kode du havde vist i forvejen...? ;)
Avatar billede karstenl Nybegynder
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 :)
Avatar billede karstenl Nybegynder
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")
---

:)
Avatar billede softspot Forsker
31. august 2005 - 12:14 #22
Velbekomme :)
Avatar billede softspot Forsker
31. august 2005 - 12:19 #23
Tak for point :)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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