webForumDet fria alternativet

Skum IF sats

ASP

14 svar · 185 visningar · startad av annesophie

Medlem sedan juni 20012 236 inlägg
Frågan#1

Alltså...

Jag har ett problem. Har antagligen suttit för länge idag och ASP'at för nu fattar jag inte vad som är fel!!!

Följande är problemet:

Har en Edit funktion, där användare kan ändra information i en textarea. Kör med två IF satser runt textarean - 1) Ifall det inte finns någon tabellrad med id = xx och 2) om tabellraden finns MEN textaarean är tom.

Det är den senare som inte funkar.

All information finns i tabellen, id't kommer in till sidan, om jag tar bort den innersta IF satsen så visas själva textarea inlägget...men så fort jag lägger på innersta if satsen så visas ingenting. Inga felmeddelanden...bara just en tom textaarea ruta med nada i!!

Här kommer en del av koden:
<%
option explicit
response.buffer=true

dim conn,sql,rs,id,sql2,rs2

id = request.querystring("id")

set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.mappath("tcf.mdb")

sql = "SELECT * FROM [project] WHERE project_id = "& id &" ;"
set rs = conn.execute(sql)

sql2 = "SELECT * FROM [project_link] WHERE project_id = "& id &" ;"
set rs2 = conn.execute(sql2)
%>

<html>
<head></head>
<body>
<table width="210" border="0">
<tr>
<td height="10" valign="top" align="top">
<%
IF rs2.bof OR rs2.eof THEN
response.write "<font color=red>" & "Empty" & "</font>"
ELSE
%>

\<%
IF (rs2("project_link_description")) = "" then
	response.write "\<font color=red\>" & "Empty" & "\</font\>"	
ELSE
%\>
	\<textarea name="project_link_description" class=ettan cols=30 rows=12\>\<%=rs2	("project_link_description")%\>\</textarea\>		
\<%END IF%\>

<%END IF%>
</td>
</tr>
</table>
<body>
<html>

VARFÖR!!! *suckar*

Help snälla!!

MvH

/A

[Redigerat av annesophie den 22 jul 2001]

Medlem sedan juni 20019 024 inlägg
#2

Hade samma fel själv för ett tag sedan. Kommer ej ihåg hur jag lösta det, men här är iaf ett sätt:

If NOT isNull(rs2"project_link_description")) Or NOT rs2("project_link_description") = "" Then
' gör nåt kul
End IF

------------------
Peter D

Medlem sedan juni 20012 236 inlägg
#3

Hej igen...

...och tack Peter men...nej, jag har testat...det vill sig inte!

Jag fattar faktiskt nada nu!

Om jag lägger in :

<%
If NOT isNull(rs2("project_link_description")) then

response.write "   " & "<font color=red>" & "Empty" & "</font>"

ELSE
%>

<textarea name="project_link_description" class=ettan cols=30 rows=12><%=rs2("project_link_description")%></textarea>

<%END IF%>

...så säger den "Empty" så som response.writen säger att den ska, så den känner ju av att det finns något i tabell cellen eller hur!!? Men jag måste ju få det att funka med "If (rs2("project_link_description")) = "" then".

If Not är ju lite avigt eller hur! Jag har testat att använda "If isNull(rs2("project_link_description")) then"...men det ger samma resultat som innan...en tom textarea.

Vad är FEL!!!

MvH

/A

[Redigerat av annesophie den 22 jul 2001]

Medlem sedan juni 20019 024 inlägg
#4

Jag vet, man blir galen på sådana problem. Jävla Microsoft!!

Du kan ju alltid debugga strängen och se vad som är fel:

Response.Write "Är den null: " & isNull(rs2("project_link_description"))
Response.Write "Innehåll: ----" & (rs2("project_link_description")) & "----"
[b]Response.Write "Är den tom: " & IsEmpty(rs2("project_link_description"))[/b]

------------------
Peter D

[Redigerat av Pace den 22 jul 2001]

Medlem sedan juni 20012 236 inlägg
#5

Vaddå?!

Jag bara slänger in detta på min sida och det ska då visas??! Hmmm *ler förläget*...attans vad jag är dålig på felsökning!!!

Hmm jag testar *lägger in koden*

Jaha...mmm jag vet inte riktigt vad som ska hända men det bidde så här:

Är den null: Onwaar (IfTrue)
Innehåll: --------
Är den tom:

Jag har en känsla att jag inte gjorde helt rätt *funderar*...

Peeeeeeeeter var ääääääär du?!?!?!

/A

Medlem sedan juni 20019 024 inlägg
#6

Hääääääääääär ääääääär jaaaaaaaag!

Strängen är null, men vafan betyder "Onwaar (IfTrue)"?

Okej, här kommer en mega debugging:

If NOT isNull(rs2("project_link_description") AND rs2("project_link_description") <> ""  AND NOT IsEmpty(rs2("project_link_description")) THEN
' visa strängen!

Om inte detta hjälper så kan bara Gud hjälpa dig.

------------------
Peter D

Medlem sedan juni 20019 024 inlägg
#7

Jag skrev fel i förförra debugexemplet, kolla med den fetmarkerade raden också!

------------------
Peter D

Medlem sedan juni 20012 236 inlägg
#8

Aaaaaaaaaah INTE DÅ!!!

Det fnkade inte...den gör absolut INGENTING...återigen en tom textarea ruta!!!

Jag testade det första debugg scriptet igen och hmm ja...OnWaar är Holländska och betyder IfTrue OmSANT eller så...och resultatet blev:

-----
Är den null: Onwaar
Innehåll: --------
Är den tom: Onwaar
------

Hmm jag antar att jag måste bli religiös nu då Peter ;^) ??!!

Guuuuuuud (eller nån) HELP!!!

/A

[Redigerat av annesophie den 22 jul 2001]

Medlem sedan juni 20019 024 inlägg
#9

Visa hela koden nu då, så får vi se om Gud assisterar.

------------------
Peter D

Medlem sedan dec. 200012 464 inlägg
#10

Är project_link_description av typen Memo/PM?

Det brukar vara lite problem att hantera dom i via ADO. Testa att tilldela värdet till en lokal variabel och använd den i stället för att ha flera referenser till rs2("project_link_description").

------------------
essentitia preter non sans multiplicandum

Medlem sedan juni 20012 236 inlägg
#11

Hmmm OK...här kommer hela sidan nu då!! Jag markerade vart det mystiska felet dyker upp!

<%
option explicit
response.buffer=true

dim conn,sql,rs,id,sql2,rs2

id = request.querystring("id")

set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.mappath("tcf.mdb")

sql = "SELECT * FROM [project] WHERE project_id = "& id &" ;"
set rs = conn.execute(sql)

sql2 = "SELECT * FROM [project_link] WHERE project_id = "& id &" ;"
set rs2 = conn.execute(sql2)

%>

<HTML>

<HEAD>

<link rel="stylesheet" type="text/css" href="css.css">

</HEAD>

<BODY marginwidth="0" marginheight="0" leftmargin="0" topmargin="2" cellspacing="0" cellpadding="0">

<form method="post" action="edit_link_check.asp?id=<%=rs("project_id")%>" >
<table width="225" height="374" border="0" bgcolor="white" class=logintva border="0" cellspacing="0" cellpadding="3">
<tr>
<td valign="top" align="top">
<table width="210" border="0">
<tr>
<td height="10" colspan="2" valign="top" align="top">
Edit Project Link
</td>
</tr>
<tr>
<td height="10" valign="top" align="top">Project folder name <br> (folder containing index)<br>/folder/</td>
</tr>
<tr>
<td height="10" valign="top" align="top">
<%
IF rs2.bof OR rs2.eof THEN
response.write "   " & "<font color=red>" & "No link added" & "</font>"
else
%>
<%
IF (rs2("project_link")) = "" then
response.write "   " & "<font color=red>" & "No link added" & "</font>"
else
%>
<input type="text" name="project_link" value="<%=rs2("project_link")%>"size="25" class=ettan>
<%end if%>
<%end if%>
</td>
</tr>
<tr>
<td height="10" valign="top" align="top">Link information:</td>
</tr>
<tr>
<td height="10" valign="top" align="top">
<!--HAR FINNS FELET NAGONSTANS-->
<%
IF rs2.bof OR rs2.eof THEN
response.write "   " & "<font color=red>" & "No link information added" & "</font>"
ELSE
%>
<%
If (rs2("project_link_description")) = "" then
response.write "   " & "<font color=red>" & "No link information added" & "</font>"
ELSE
%>
<textarea name="project_link_description" class=ettan cols=30 rows=12><%=rs2("project_link_description")%></textarea>
<%END IF%>
<%END IF%>
<!--SLUT PA FEL-->
</td>
</tr>
<tr>
<td colspan="2" height="70" valign="top" align="right"> </td>
</tr>
<tr>
<td colspan="2" align="right" valign="right">
<%
IF rs2.bof OR rs2.eof then
response.write "   " & "<font color=red>" & "Update impossible" & "</font>"
ELSE
%>
<%
IF (rs2("project_link")) = "" OR (rs2("project_link_description")) = "" THEN
response.write "   " & "<font color=red>" & "Update impossible" & "</font>"
ELSE
%>
<input type="submit" value=" [Update] " class=tvaan>
</td>
</tr>
</table>

	\</td\>
\</tr\>

</table>
</form>
<%end if%>
<%end if%>
</BODY>

</HTML>

Medlem sedan juni 20012 236 inlägg
#12

LarsG...

JAAA!!! Den är en MEMO!!

Hur fanken tilldelar jag den en "lokal varabel" ??? *fattar ingenting* Vad är en lokal varabel??!

MvH

/A

Medlem sedan juni 20019 024 inlägg
#13

detta_ar_en_lokal_variabel_om_an_en_valdig_lang_variabel = rs2 ("project_link_description")%

------------------
Peter D

Medlem sedan dec. 200012 464 inlägg
#14

Så här


dim lokal

lokal = rs2("project_link_description")

if  IsNull(lokal) or lokal = "" then
 response.write "Empty <br>" 
else 
 response.write lokal & "<br>"
end if

------------------
essentitia preter non sans multiplicandum

Medlem sedan juni 20012 236 inlägg
#15

JAAAAAAAAAAAAAAAAAAAAAAAAA *hoppar upp och ner* Det funkar!!!!!!!

TACK * 1000000000 LarsG och Pace!!!!!

*kramz*

/A

266 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
137 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)