Avatar billede smidt Novice
20. april 2001 - 15:15 Der er 26 kommentarer og
1 løsning

Sortering

Med SQL sætning får jeg en liste med alleposterne sorteret efter kommune i en asp side.

SELECT Kunde.Beliggenhed, Kunde.Kontant,  Kunde.Brutto, Kunde.Netto, Kunde.Udbet, Kunde.Vær, Kunde.Kvm, Kunde.Grund,  Kunde.Sagsnr
FROM Kunde
ORDER BY Kunde.Kommune

Det jeg godt kunne tænke mig er at listen bliver sorteret efter kommune men kun med (kommunen) som overskrift....og nedenunder alle de poster der i i den pågældende kommune

osv.
Hvordan
Avatar billede smidt Novice
20. april 2001 - 15:17 #1
Avatar billede sone Nybegynder
20. april 2001 - 15:21 #2
Indsæt en WHERE:

FROM Kunde
WHERE Kunde.Kommune=\'Aalborg\'
ORDER BY Kunde.Kommune
Avatar billede burningice Nybegynder
20. april 2001 - 18:23 #3
denne virker også

<%
\'først vælger vi kommunerne og grupperer dem
strSQL = SELECT * FROM Kunde GROUP BY Kommune ORDER BY Kommune
set rs = conn.execute(strSQL)

\'dernest skriver vi alle posterne ud til de pågældende kommuner
do until rs.eof%>
<b><%=rs(\"kommune\")%></b><br>
Sagsnr: <%=conn.execute(\"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')(\"sagsnr\")
rs.movenext
loop
%>
Avatar billede burningice Nybegynder
20. april 2001 - 18:29 #4
sorry... var lidt for hurtigt... jeg tog den fra en count som jeg havde brugt... denne skulle virke bedre


\'først vælger vi kommunerne og grupperer dem
strSQL = SELECT * FROM Kunde GROUP BY Kommune ORDER BY Kommune
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
do until rs.eof
response.write \"<b>\"& rs(\"kommune\")&\"</b><br>\"
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"
set rs1 = conn.execute(strSQL1)
do until rs1.eof
response.write \"Sagsnr:\"& rs1(\"sagsnr\")
rs1.movenext
loop
rs.movenext
loop
Avatar billede smidt Novice
20. april 2001 - 19:52 #5
Data kommer fra en access og siden er lavet i frontpage hvordan skal jeg skrive koden

Sådan ser det ud når jeg laver det nu. men der kommer kommune ud for hver eneste så????

<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">
<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">
<title>Ny side 1</title>
<meta name=\"Microsoft Border\" content=\"none\">
</head>

<body>
<script language=\"Javascript\">
function printpage()
{
window.print()
}
</script>

<div align=\"center\">
  <center>

<table width=\"630\" border=\"0\" align=\"left\">
  <thead>
    <tr>
      <td bgcolor=\"#0066FF\" width=\"95\"><b><font size=\"2\" color=\"#FFFFFF\">Beliggenhed</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"82\"><b><font size=\"2\" color=\"#FFFF00\">Kommune</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"72\"><b><font size=\"2\" color=\"#FFFFFF\">Kontant</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"62\"><b><font size=\"2\" color=\"#FFFFFF\">Brutto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"58\"><b><font size=\"2\" color=\"#FFFFFF\">Netto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Udbet</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"49\"><b><font size=\"2\" color=\"#FFFFFF\">Vær</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"53\"><b><font size=\"2\" color=\"#FFFFFF\">Kvm</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Grund</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"65\"><b><font size=\"2\" color=\"#FFFFFF\">Sagsnr</font></b></td>
    </tr>
  </thead>
  <tbody>
    <!--webbot bot=\"DatabaseRegionStart\" startspan
    s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
    s-columntypes=\"202,202,6,4,3,3,202,202,202,202\" s-dataconnection=\"dab\"
    b-tableformat=\"TRUE\" b-menuformat=\"FALSE\" s-menuchoice=\"Beliggenhed\"
    s-menuvalue=\"Beliggenhed\" b-tableborder=\"TRUE\" b-tableexpand=\"TRUE\"
    b-tableheader=\"TRUE\" b-listlabels=\"TRUE\" b-listseparator=\"TRUE\"
    i-ListFormat=\"0\" b-makeform=\"TRUE\" s-recordsource
    s-displaycolumns=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
    s-criteria s-order
    s-sql=\"SELECT Kunde.Beliggenhed, Kunde.Kommune, Kunde.Kontant, Kunde.Brutto, Kunde.Netto, Kunde.Udbet, Kunde.Vær, Kunde.Kvm, Kunde.Grund, Kunde.Sagsnr&lt;br&gt;FROM Kunde&lt;br&gt;GROUP BY Kunde.Beliggenhed, Kunde.Kommune, Kunde.Kontant, Kunde.Brutto, Kunde.Netto, Kunde.Udbet, Kunde.Vær, Kunde.Kvm, Kunde.Grund, Kunde.Sagsnr&lt;br&gt;ORDER BY Kunde.Kommune, Kunde.Kontant\"
    b-procedure=\"FALSE\" clientside SuggestedExt=\"asp\" s-DefaultFields
    s-NoRecordsFound=\"Der er ikke blevet returneret nogen poster.\"
    i-MaxRecords=\"256\" i-GroupSize=\"13\" BOTID=\"0\"
    u-dblib=\"../_fpclass/fpdblib.inc\" u-dbrgn1=\"../_fpclass/fpdbrgn1.inc\"
    u-dbrgn2=\"../_fpclass/fpdbrgn2.inc\" tag=\"TBODY\"
    local_preview=\"&lt;tr&gt;&lt;td colspan=64 bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot; width=&quot;100%&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Områderne med databaseresultater kan kun vises, hvis siden hentes fra en Web-server med en Web-browser. Følgende tabelrække gentages én gang for hver post, som returneres af forespørgslen.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;\"
    preview=\"&lt;tr&gt;&lt;td colspan=64 bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot; width=&quot;100%&quot;&gt;&lt;font color=&quot;#000000&quot;&gt;Dette er begyndelsen af området med databaseresultater. Denne side kan kun vises korrekt, hvis den hentes fra en Web-server med en Web-browser. Det aktuelle Web-sted er gemt på din harddisk eller på det lokale netværk.&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;\"
    b-WasTableFormat=\"TRUE\" b-ReplaceDatabaseRegion=\"FALSE\" --><!--#include file=\"../_fpclass/fpdblib.inc\"-->
<%
fp_sQry=\"SELECT Kunde.Beliggenhed, Kunde.Kommune, Kunde.Kontant, Kunde.Brutto, Kunde.Netto, Kunde.Udbet, Kunde.Vær, Kunde.Kvm, Kunde.Grund, Kunde.Sagsnr FROM Kunde GROUP BY Kunde.Beliggenhed, Kunde.Kommune, Kunde.Kontant, Kunde.Brutto, Kunde.Netto, Kunde.Udbet, Kunde.Vær, Kunde.Kvm, Kunde.Grund, Kunde.Sagsnr ORDER BY Kunde.Kommune, Kunde.Kontant\"
fp_sDefault=\"\"
fp_sNoRecords=\"<tr><td colspan=10 align=left width=\"\"100%\"\">Der er ikke blevet returneret nogen poster.</td></tr>\"
fp_sDataConn=\"dab\"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=13
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice=\"Beliggenhed\"
fp_sMenuValue=\"Beliggenhed\"
fp_iDisplayCols=10
fp_fCustomQuery=True
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file=\"../_fpclass/fpdbrgn1.inc\"-->
<!--webbot bot=\"DatabaseRegionStart\" i-CheckSum=\"8076\" endspan -->
    <tr>
      <td bgcolor=\"#C9DADE\" width=\"150\"><font size=\"2\"><a href=\"de.asp?Sagsnr=<%=FP_FieldURL(fp_rs,\"Sagsnr\")%>\" target=\"f2\"><!--webbot
        bot=\"DatabaseResultColumn\" startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Beliggenhed\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Beliggenhed&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Beliggenhed&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Beliggenhed\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"28187\" endspan -->
        </a></font></td>
      <td bgcolor=\"#C9DADE\" width=\"82\" align=\"center\">
        <p align=\"left\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Kommune\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kommune&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kommune&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Kommune\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"13950\" endspan -->
        </font></p>
    </td>
      <td bgcolor=\"#C9DADE\" width=\"72\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Kontant\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kontant&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kontant&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Kontant\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"14125\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"62\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Brutto\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Brutto&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Brutto&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Brutto\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"15818\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"58\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Netto\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Netto&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Netto&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Netto\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"7933\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"61\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Udbet\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Udbet&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Udbet&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Udbet\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"8225\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"49\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Vær\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Vær&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Vær&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Vær\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"17039\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"53\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Kvm\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kvm&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Kvm&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Kvm\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"4674\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"61\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Grund\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Grund&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Grund&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Grund\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"9094\" endspan -->
        </font></td>
      <td bgcolor=\"#C9DADE\" width=\"65\" align=\"center\"><font size=\"2\"><!--webbot bot=\"DatabaseResultColumn\"
        startspan
        s-columnnames=\"Beliggenhed,Kommune,Kontant,Brutto,Netto,Udbet,Vær,Kvm,Grund,Sagsnr\"
        s-column=\"Sagsnr\" b-tableformat=\"TRUE\" b-hasHTML=\"FALSE\" clientside
        local_preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Sagsnr&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\"
        preview=\"&lt;font size=&quot;-1&quot;&gt;&amp;lt;&amp;lt;&lt;/font&gt;Sagsnr&lt;font size=&quot;-1&quot;&gt;&amp;gt;&amp;gt;&lt;/font&gt;\" --><%=FP_FieldVal(fp_rs,\"Sagsnr\")%><!--webbot
        bot=\"DatabaseResultColumn\" i-CheckSum=\"14714\" endspan -->
        </font></td>
    </tr>
    <!--webbot bot=\"DatabaseRegionEnd\" startspan b-tableformat=\"TRUE\"
    b-menuformat=\"FALSE\" u-dbrgn2=\"../_fpclass/fpdbrgn2.inc\" i-groupsize=\"13\"
    clientside tag=\"TBODY\"
    <hr color=\"#0066FF\" size=13 local_preview=\"<tr><td colspan=64 bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot; width=&quot;100%&quot;><font color=&quot;#000000&quot;>Dette er slutningen af området med databaseresultater.</font></td></tr><TR><TD ALIGN=LEFT VALIGN=MIDDLE COLSPAN=64><FORM><NOBR><INPUT TYPE=Button VALUE=&quot;  |<  &quot;><INPUT TYPE=Button VALUE=&quot;  <  &quot;><INPUT TYPE=Button VALUE=&quot;  >  &quot;><INPUT TYPE=Button VALUE=&quot;  >|  &quot;>  [1/13]</NOBR></FORM></td></tr>\" preview=\"<tr><td colspan=64 bgcolor=&quot;#FFFF00&quot; align=&quot;left&quot; width=&quot;100%&quot;><font color=&quot;#000000&quot;>Dette er slutningen af området med databaseresultater.</font></td></tr><TR><TD ALIGN=LEFT VALIGN=MIDDLE COLSPAN=64><NOBR><INPUT TYPE=Button VALUE=&quot;  |<  &quot;><INPUT TYPE=Button VALUE=&quot;  <  &quot;><INPUT TYPE=Button VALUE=&quot;  >  &quot;><INPUT TYPE=Button VALUE=&quot;  >|  &quot;>  [1/13]</NOBR><BR></td></tr>\"><!--#include file=\"../_fpclass/fpdbrgn2.inc\"-->
<!--webbot bot=\"DatabaseRegionEnd\" i-CheckSum=\"56926\" endspan -->
    <tr>
      <TD ALIGN=LEFT VALIGN=MIDDLE COLSPAN=5 width=\"311\"><img border=\"0\" src=\"../images/ikon_print.gif\" onclick=\"printpage()\" alt=\"Udskriv ejendommen \" align=\"left\"></td>
    </tr>
</table>

    </center>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p align=\"left\">&nbsp;</p>
<p align=\"left\">&nbsp;</p>

</body>
Avatar billede burningice Nybegynder
20. april 2001 - 20:21 #6
fååårk... den rører jeg sq ikke med en ildtang :(

En idé til dig var... prøv at indsæt min kode i et nyt asp document... hvis det virker efter hensigten kan du lige så langsomt rette det til så det ser ud som DU vil have det... du kan sagtens gøre det i frontpage, bare HOLD DIG VÆK FRA FP\'s EGNE ASP FUNKTIONER... de er SÅ ugennemskuelige...

altså :

<%
session.LCID = 1030
response.buffer = true

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\")
%>
<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>New Page 1</title>
</head>

<body>

<%

\'først vælger vi kommunerne og grupperer dem
strSQL = SELECT * FROM Kunde GROUP BY Kommune ORDER BY Kommune
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
do until rs.eof
response.write \"<b>\"& rs(\"kommune\")&\"</b><p>\"
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"
set rs1 = conn.execute(strSQL1)
do until rs1.eof
response.write \"Sagsnr:\"& rs1(\"sagsnr\")&\"<br>\"
rs1.movenext
loop
rs.movenext
loop
%>

</body>

</html>
Avatar billede smidt Novice
21. april 2001 - 10:23 #7
Ok.....Jeg prøver!!!!!
Avatar billede smidt Novice
22. april 2001 - 14:06 #8
Det hvar jo \"nemt\" nok Nu skal jeg barre have data til at lande i tabbelen med overskrifter for hver kommune kan du hjælpe:

<%
session.LCID = 1030
response.buffer = true

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"Ejendomme.mdb\")
%>
<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>New Page 1</title>
</head>

<body>

<%

\'først vælger vi kommunerne og grupperer dem
strSQL = \"SELECT Kunde.Kommune FROM Kunde GROUP BY Kunde.Kommune ORDER BY Kunde.Kommune\"
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
do until rs.eof
response.write \"<b>\"& rs(\"kommune\")&\"</b><p>\"
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"
set rs1 = conn.execute(strSQL1)
do until rs1.eof
response.write  rs1(\"Beliggenhed\") & rs1(\"Kontant\")& rs1(\"Brutto\")& rs1(\"Netto\")& rs1(\"Udbet\")& rs1(\"Vær\")& rs1(\"Kvm\")& rs1(\"Grund\")& rs1(\"Sagsnr\") & vbcrlf &\"<br>\"

rs1.movenext
loop
rs.movenext
loop
%>

<table width=\"630\" border=\"0\" align=\"left\">
    <tr>
      <td width=\"95\"><b><span style=\"background-color: #FFFFFF\"><font size=\"3\">Kommune:</font></span></b></td>
    </tr>
    <tr>
      <td bgcolor=\"#0066FF\" width=\"95\"><b><font size=\"2\" color=\"#FFFFFF\">Beliggenhed</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"72\"><b><font size=\"2\" color=\"#FFFFFF\">Kontant</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"62\"><b><font size=\"2\" color=\"#FFFFFF\">Brutto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"58\"><b><font size=\"2\" color=\"#FFFFFF\">Netto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Udbet</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"49\"><b><font size=\"2\" color=\"#FFFFFF\">Vær</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"53\"><b><font size=\"2\" color=\"#FFFFFF\">Kvm</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Grund</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"65\"><b><font size=\"2\" color=\"#FFFFFF\">Sagsnr</font></b></td>
    </tr>
    <tr>
      <td bgcolor=\"#CFDDDE\" width=\"95\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"72\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"62\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"58\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"61\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"49\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"53\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"61\">&nbsp;</td>
      <td bgcolor=\"#CFDDDE\" width=\"65\">&nbsp;</td>
    </tr>
</table>

<p>&nbsp;</p>
<p>&nbsp;</p>

</body>
Avatar billede smidt Novice
22. april 2001 - 14:13 #9
Og du har ret Frontpage er ugennemskulig....
Avatar billede burningice Nybegynder
22. april 2001 - 16:49 #10
du har ikke mulighed for at sende mig databasen... det vil gøre det hele lidt nemmere :)
Avatar billede smidt Novice
22. april 2001 - 17:07 #11
Nej det har jeg ikke, men det er jo heller ikke databasen der er problemet men hvordan datane lander på siden. Og du har fået datane til at lande rigtigt \"næsten\" nu skal jeg barre kunne styre dem derfor vil jeg gerne have dem i en tabel er det noget med strData????

Du er den kloge så hvis det er det nemmeste hvad er din email så, men det lærer jeg ikke noget af
Avatar billede burningice Nybegynder
22. april 2001 - 17:22 #12
nm then... det er bare for at jeg lige kunne tjekke om det nu også virkede før jeg sendte det her :)

det her skulle virke

<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>New Page 1</title>
</head>

<body>

<%
\'først vælger vi kommunerne og grupperer dem
strSQL = \"SELECT Kunde.Kommune FROM Kunde GROUP BY Kunde.Kommune ORDER BY Kunde.Kommune\"
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
%>
<table width=\"630\" border=\"0\" align=\"left\">
<% do until rs.eof %>
    <tr>
      <td width=\"95\"><b><span style=\"background-color: #FFFFFF\"><font size=\"3\">Kommune:<% response.write \"<b>\"& rs(\"kommune\")&\"</b><p>\" %>
      </font></span></b></td>
    </tr>

<%
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"

set rs1 = conn.execute(strSQL1)
do until rs1.eof

%>

    <tr>
      <td bgcolor=\"#0066FF\" width=\"95\"><b><font size=\"2\" color=\"#FFFFFF\">Beliggenhed</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"72\"><b><font size=\"2\" color=\"#FFFFFF\">Kontant</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"62\"><b><font size=\"2\" color=\"#FFFFFF\">Brutto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"58\"><b><font size=\"2\" color=\"#FFFFFF\">Netto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Udbet</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"49\"><b><font size=\"2\" color=\"#FFFFFF\">Vær</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"53\"><b><font size=\"2\" color=\"#FFFFFF\">Kvm</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Grund</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"65\"><b><font size=\"2\" color=\"#FFFFFF\">Sagsnr</font></b></td>
    </tr>
    <tr>
      <td bgcolor=\"#CFDDDE\" width=\"95\"><%=rs1(\"Beliggenhed\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"72\"><%=rs1(\"Kontant\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"62\"><%=rs1(\"Brutto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"58\"><%=rs1(\"Netto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Udbet\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"49\"><%=rs1(\"Vær\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"53\"><%=rs1(\"Kvm\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Grund\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"65\"><%=rs1(\"Sagsnr\")%></td>
    </tr>

<%
rs1.movenext
loop
rs.movenext
loop
%>

</table>

</body>
</html>
<% conn.close
set conn = nothing %>
Avatar billede smidt Novice
22. april 2001 - 18:46 #13
Jeg får en fejl

Microsoft VBScript runtime error \'800a01a8\'

Object required: \'conn\'

/Databaser/Sortering2.asp, line 13
Avatar billede smidt Novice
22. april 2001 - 18:49 #14
Min kode ser sådan her ud:

<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>New Page 1</title>
</head>

<body>

<%
\'først vælger vi kommunerne og grupperer dem
strSQL = \"SELECT Kunde.Kommune FROM Kunde GROUP BY Kunde.Kommune ORDER BY Kunde.Kommune\"
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
%>
<table width=\"630\" border=\"0\" align=\"left\">
<% do until rs.eof %>
    <tr>
      <td width=\"95\"><b><span style=\"background-color: #FFFFFF\"><font size=\"3\">Kommune:<% response.write \"<b>\"& rs(\"kommune\")&\"</b><p>\" %>
      </font></span></b></td>
    </tr>

<%
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"

set rs1 = conn.execute(strSQL1)
do until rs1.eof

%>

    <tr>
      <td bgcolor=\"#0066FF\" width=\"95\"><b><font size=\"2\" color=\"#FFFFFF\">Beliggenhed</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"72\"><b><font size=\"2\" color=\"#FFFFFF\">Kontant</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"62\"><b><font size=\"2\" color=\"#FFFFFF\">Brutto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"58\"><b><font size=\"2\" color=\"#FFFFFF\">Netto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Udbet</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"49\"><b><font size=\"2\" color=\"#FFFFFF\">Vær</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"53\"><b><font size=\"2\" color=\"#FFFFFF\">Kvm</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Grund</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"65\"><b><font size=\"2\" color=\"#FFFFFF\">Sagsnr</font></b></td>
    </tr>
    <tr>
      <td bgcolor=\"#CFDDDE\" width=\"95\"><%=rs1(\"Beliggenhed\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"72\"><%=rs1(\"Kontant\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"62\"><%=rs1(\"Brutto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"58\"><%=rs1(\"Netto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Udbet\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"49\"><%=rs1(\"Vær\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"53\"><%=rs1(\"Kvm\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Grund\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"65\"><%=rs1(\"Sagsnr\")%></td>
    </tr>

<%
rs1.movenext
loop
rs.movenext
loop
%>

</table>

</body>
</html>
<% conn.close
set conn = nothing %>
Avatar billede burningice Nybegynder
22. april 2001 - 19:00 #15
.... okay... du er begynder :D

jeg glemte vist at inkludere conn koden, men så langt troede jeg nu godt du kunne tænke...
prøv at indsætte dette i toppen af dit asp dokument

<%
session.LCID = 1030
response.buffer = true

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"Ejendomme.mdb\")
%>
Avatar billede smidt Novice
23. april 2001 - 19:56 #16
Ups det havde jeg overset.......

Men det hvirker så det er jo perfekt, dog skal overskrifterne kun vises een gang for hver kommune og ikke som nu \"for hver post\" det ser ikke smart ud har du et forslag

Og sidst skal \"beliggenhed\" være en url Den ser sådan her ud i frontpage: <a href=\"de.asp?Sagsnr=<%=FP_FieldURL(fp_rs,\"Sagsnr\")%>\" target=\"f2\">

Jeg forhøjer med 50 point for der må være tale om et tilægsspørgsmål.
Avatar billede burningice Nybegynder
23. april 2001 - 20:05 #17
hvad for noget... den skulle da gerne vise

kommune1
Data1
Data11
Data12
Data13

kommune2
Data2
Data21
Data23
Data24

Den med billigenhed laver du sådan her

<td bgcolor=\"#CFDDDE\" width=\"95\"><a href=\"dit_link\"><%=rs1(\"Beliggenhed\")%></a></td>

hvor skal man sendes hen når man klikker på linket??

Har du forresten en side hvor jeg kan se hvordan det ser ud nu??
Avatar billede smidt Novice
23. april 2001 - 23:07 #18
Ja ja det gør den også men overskrifte vises for hver post se http://www.vipiil.dk/Databaser/Sortering2.asp

Den skal se sådan her ud (med overskriften)
http://www.vipiil.dk/Databaser/re.asp

Til de.asp?Sagsnr=<%=rs1(\"Sagsnr\")%\" target=\"f2\"

I frontpage hedder det <%=FP_FieldURL(fp_rs,\"Sagsnr\")%>\"
Avatar billede smidt Novice
23. april 2001 - 23:15 #19
Når man klikker på linket skal man sendes til

Til de.asp?Sagsnr=<%=rs1(\"Sagsnr\")%\" target=\"f2\"

I frontpage hedder det <%=FP_FieldURL(fp_rs,\"Sagsnr\")%>\"

Alså den post der passer på sagsnr...

Avatar billede smidt Novice
24. april 2001 - 13:23 #20
Jeg har klaret linket som du kan se så nu mangler jeg barre overskrifterne.......
Avatar billede burningice Nybegynder
24. april 2001 - 15:23 #21
æææh... nu er jeg forvirret...

http://www.vipiil.dk/Databaser/Sortering2.asp  er da som jeg forstod det... cant\' see det proplem

http://www.vipiil.dk/Databaser/re.asp
er da sådan som jeg forstod at den IKKE skulle være... og hvad er det for en overskrift du snakker om ??

OOOOOOh... now i get it, i think :) Prøv den her

<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>New Page 1</title>
</head>

<body>

<%
\'først vælger vi kommunerne og grupperer dem
strSQL = \"SELECT Kunde.Kommune FROM Kunde GROUP BY Kunde.Kommune ORDER BY Kunde.Kommune\"
set rs = conn.execute(strSQL) 

\'dernest skriver vi alle posterne ud til de pågældende kommuner
%>
<table width=\"630\" border=\"0\" align=\"left\">
<% do until rs.eof %>
    <tr>
      <td width=\"95\"><b><span style=\"background-color: #FFFFFF\"><font size=\"3\">Kommune:<% response.write \"<b>\"& rs(\"kommune\")&\"</b><p>\" %>
      </font></span></b></td>
    </tr>

    <tr>
      <td bgcolor=\"#0066FF\" width=\"95\"><b><font size=\"2\" color=\"#FFFFFF\">Beliggenhed</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"72\"><b><font size=\"2\" color=\"#FFFFFF\">Kontant</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"62\"><b><font size=\"2\" color=\"#FFFFFF\">Brutto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"58\"><b><font size=\"2\" color=\"#FFFFFF\">Netto</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Udbet</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"49\"><b><font size=\"2\" color=\"#FFFFFF\">Vær</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"53\"><b><font size=\"2\" color=\"#FFFFFF\">Kvm</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"61\"><b><font size=\"2\" color=\"#FFFFFF\">Grund</font></b></td>
      <td bgcolor=\"#0066FF\" width=\"65\"><b><font size=\"2\" color=\"#FFFFFF\">Sagsnr</font></b></td>
    </tr>

<%
strSQL1 = \"SELECT * FROM kunde where (kommune = \'\"& rs(\"kommune\")&\"\')\"

set rs1 = conn.execute(strSQL1)
do until rs1.eof

%>

    <tr>
      <td bgcolor=\"#CFDDDE\" width=\"95\"><%=rs1(\"Beliggenhed\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"72\"><%=rs1(\"Kontant\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"62\"><%=rs1(\"Brutto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"58\"><%=rs1(\"Netto\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Udbet\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"49\"><%=rs1(\"Vær\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"53\"><%=rs1(\"Kvm\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"61\"><%=rs1(\"Grund\")%></td>
      <td bgcolor=\"#CFDDDE\" width=\"65\"><%=rs1(\"Sagsnr\")%></td>
    </tr>

<%
rs1.movenext
loop
rs.movenext
loop
%>

</table>

</body>
</html>
<% conn.close
set conn = nothing %>
Avatar billede smidt Novice
24. april 2001 - 19:42 #22
Du har fanget den meeeeen de kommer ud i forlængelse prøv at se http://www.vipiil.dk/Databaser/Sortering2.asp
Avatar billede smidt Novice
24. april 2001 - 19:49 #23
Nu er det perfekt manglede lige et par </tr>

Tusind mange tak du har en stor fremtid foran dig....
Avatar billede burningice Nybegynder
24. april 2001 - 19:51 #24
.... what... forlængelse?? prøv at skriv det lidt langsommere :)
Avatar billede burningice Nybegynder
24. april 2001 - 20:12 #25
jeg takker mange gange... :)
Avatar billede smidt Novice
24. april 2001 - 20:15 #26
Lige en sidste ting hvor skal jeg sætte target=f2 ind denne

<td bgcolor=\"#CFDDDE\" width=\"200\"><font size=\"2\"><a href=\"de.asp?Sagsnr=<%=rs1(\"Sagsnr\")%>\"><%=rs1(\"Beliggenhed\")%></a></td>
Avatar billede smidt Novice
24. april 2001 - 21:18 #27
Jeg har fundet ud af det
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