webForumDet fria alternativet

ny tabell eller inte

ASP

28 svar · 529 visningar · startad av antar · sida 2 av 2

Frågan, av antar

så ser koden ut i kompis.asp Blir så här: Kompisar: antar antar1 antar2 istället för: Kompisar: antar \------------------ antar1 \------------------ antar2 \-------------------- vill bara skriva ut nytt tabell när Kompisar = true!! \<% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/kompisar.mdb")&""

Läs frågan i sin helhet →
Medlem sedan dec. 2001289 inlägg
#21

asså din kod funkar utmärkt men har ändrat lite på den får den inte och funka!!

Medlem sedan mars 20015 287 inlägg
#22

Detta tror jag är fel: (fetmarkerat)

<html>
<head>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber5">
  <tr>

    <td width="451">

	<table border="0" cellspacing="1" style="border:1px solid #000000; border-collapse: collapse" width="100%">
<tr><td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><font size="1" face="Tahoma">
     <b>Gifta</b></font></td>
  </tr>
  <tr>
    <td width="100%">antar</td>
  </tr>

</table>
  </td></tr></td></table><img border="0" src="Bilder/1pxtrans.gif" width="1" height="4"><br>
	<table border="0" cellspacing="1" style="border:1px solid #000000; border-collapse: collapse" width="100%">
<tr><td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><font size="1" face="Tahoma">
     <b>Kompanjoner</b></font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#FFFFFF">antar</td>
  </tr>

</table>
  </td></tr><td width="100%">antar</td>
  </tr>

</table>
  </td></tr>[B]</td>[/B]</table><img border="0" src="Bilder/1pxtrans.gif" width="1" height="4"><br>
	<table border="0" cellspacing="1" style="border:1px solid #000000; border-collapse: collapse" width="100%">
<tr><td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><font size="1" face="Tahoma">
     <b>Kompisar</b></font></td>
  </tr>
  <tr>
    <td width="100%">antar</td>
  </tr>

</table>
  </td></tr>[B]</td>[/B]</table><img border="0" src="Bilder/1pxtrans.gif" width="1" height="4"><br>
	<table border="0" cellspacing="1" style="border:1px solid #000000; border-collapse: collapse" width="100%">
<tr><td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><font size="1" face="Tahoma">
     <b>Tvillingar</b></font></td>
  </tr>
  <tr>
    <td width="100%">antar</td>
  </tr>

</table>
  </td></tr>[B]</td>[/B]</table><img border="0" src="Bilder/1pxtrans.gif" width="1" height="4"><br>
	<table border="0" cellspacing="1" style="border:1px solid #000000; border-collapse: collapse" width="100%">
<tr><td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><font size="1" face="Tahoma">
     <b>Älskling</b></font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#FFFFFF">antar</td>
  </tr>

</table>
  </td></tr>[B]SAKNAS: <tr>[/B]<td width="100%">antar</td>
  </tr>

</table>
  </td></tr>
</table></td>
  </tr>
  <tr>
    <td width="451" colspan="2">
    
    </td>
  </tr>
</table>
</html>
Medlem sedan dec. 2001289 inlägg
#23

fattar inget av det kod som du skrev förut?
hur tar jag bort de där tr och td?

Medlem sedan mars 20015 287 inlägg
#24

Hur ser din kod ut som genererat den html-kod vi har nu?

Medlem sedan dec. 2001289 inlägg
#25
<%
 first = "yes"
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/kompisar.mdb")&"" 
Set RecSet = Server.CreateObject("ADODB.Recordset") 
Addera = "Select * From Kompisar Where not accepterad=false and Kompis1 = 'antar' or kompis2 = 'antar' and not accepterad=false order by relation,Kompis1 ASC" 
RecSet.Open Addera, Connect, 3, 3 

do until recset.eof 

Set Connect2 = Server.CreateObject("ADODB.Connection") 
Connect2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Database/Medlemmar.mdb")&"" 
Set RecSet2 = Server.CreateObject("ADODB.Recordset") 

if recset("kompis1") = "antar" then 
Addera = "Select * From Medlemmar Where Anvandarnamn = '"&recset("kompis2")&"'" 
end if 

if recset("kompis2") = "antar" then 
Addera = "Select * From Medlemmar Where Anvandarnamn = '"&recset("kompis1")&"' " 
end if 

RecSet2.Open Addera, Connect2, 3, 3 

if recset("Relation") <> strRelation then 
	strRelation = recset("Relation")

	If first <> "yes" then
%></table><br>
<%End If%>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: bordercolor="#111111" width="100%">
<tr><td width="100%"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
  <tr>
    <td width="100%"><%=recset("Relation")%></td>
  </tr>
  <tr>
    <td width="100%"><%=recset("kompis1")%></td>
  </tr>
  </table>
  </td></tr>
<%End if%>
<%
first = "no"
RecSet.MoveNext 
Loop%></table><br>
Medlem sedan mars 20015 287 inlägg
#26

Eller har du htmlkod i databasen?

Antingen är jag blind eller så ser jag inget ;)

Jag tycker onekligen att du har kod i din genererade html-fil som inte finns i asp-scriptet.
Har du kod i databasen? I så fall, hur ser den ut?

RED. Om inte annat, adda mig på ICQ om du har lust... 11797197

Medlem sedan dec. 2001289 inlägg
#27

asså det blir knass med cellerna annars inget fel på koden!!

Medlem sedan mars 20015 287 inlägg
#28

Jo jag fattar att det blir knaas med cellerna, men jag fattar inte varifrån den kod som ställer till det med celerna kommer från, det är därför jag frågar.
Tex denna kodrad ser jag inte i ditt script: (mm)

<img border="0" src="Bilder/1pxtrans.gif" width="1" height="4">

Var kommer den raden från? Virus? ;)

Medlem sedan dec. 2001289 inlägg
#29

förklara hur koden funkar istället!!!!

285 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
133 ms — deklarationer (db)
0 ms — hämta statistik (cache)
147 ms — hämta tråd, inlägg och bilagor (db)
135 ms — ändringar (db)