Webnoob Juniormester
02. april 2020 - 22:21 Der er 2 kommentarer

Vise mssql table i en html table med løkke

Det er mange mange år siden jeg har prøvet og lave noget i asp.
Jeg vil gerne en bestemt kolonne fra min database i en table. Har prøvet google, men er ikke blevet klogere.

Er der en der vil hjælpe?
bsn Seniormester
11. april 2020 - 13:49 #1
<%
    Sql="SELECT * FROM tblKonto"
    RS.Open Sql, Conn, 3, 3
    Do Until RS.EOF
    %>
    <tr <%IF RS("KontoType")="Sum" Then Response.Write "bgcolor='#CCCCCC'"%>>
        <td><%=RS("KontoID")%></td>
        <td><%=RS("KontoNavn")%></td>
        <td><%=RS("SumTekst")%></td>
        <%If RS("KontoType")="Sum" OR RS("KontoType")="Status" Then%>
            <td>&nbsp;</td>
        <%Else%>
            <td align="center"><%=IIf(RS("Moms")=0,"Nej","Ja")%></td>
        <%End If%>
        <td><%=RS("Konto")%></td>
        <td><%=RS("KontoType")%></td>
    </tr>
    <tr><td colspan="8"><hr></td></tr>
    <%
    RS.MoveNext
    Loop
    RS.Close
    %>
dannielsen Praktikant
13. maj 2020 - 12:55 #2
Her er et eksempel med kommentarer i scriptet...
Der er formentlig lige nogle ting der skal rettes sådan det passer til din tabel og database... Fx. connection-string og kolonne-navn

connection_string="Server=myServerAddress;Database=myDataBase;User Id=myUsername;Password=myPassword;"
'din connection-string til databasen - skal udfyldes med server-adresse, database, brugernavn og password ovenfor. Evt. skal du bruge en anden connection-string...

set conn = server.createobject("ADODB.Connection")
'vi opretter et object (ADODB)
conn.open connection_string
'vi opretter forbindelse til db

set rs1 = conn.execute("select kolonne_navn from min_tabel")
'vi sender en select-forespørgsel til tabellen i databasen

if rs1.EOF=False then
'vi sikrer os, at der er resultater fra tabellen i databasen - for at undgå nedenstående loop fejler
%>
<table>
<%
do until rs1.EOF=True
kolonne_navn=rs1("kolonne_navn")
%>
<tr>
<td style="width: 100%;">
<%=kolonne_navn%>
</td>
</tr>
<%
rs1.movenext
loop
%>
</table>
<%
end if

rs1.close
set rs1=nothing
'vi lukker objektet rs1 igen

conn.close
'vi lukker forbindelsen til databasen igen
set conn=nothing
'vi lukker objektet igen (ADODB)
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

Opret Preview

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





Premium
Test: Apples nye iPhone er bygget til fart og stil: Så gode er iPhone 12 og iPhone 12 Pro
Computerworld tester: IPhone 12 og iPhone 12 Pro er bygget til fart og til at se godt ud. Varen leveres stilsikkert, men noget er overset i farten.
Computerworld
Salling Group lukker stor online-satsning efter kun et år
Millionsatsningen Fillop lukker ved årets udgang. I stedet er supermarkeds-giganten Salling Group nu på vej med en række helt nye online-satsninger, der er affødt af coronakrisen.
CIO
Podcast: Hos Viking Life-Saving Equipment er it gået fra at være backend til at være noget, som kunderne spørger aktivt efter
Podcast, The Digital Edge: Viking leverer en stadig større del af deres produkt som en tjeneste. Som en del af tjenesten tager Viking ansvar for sikkerheden ved at levere, dokumentere og vedligeholde det nødvendige sikkerhedsudstyr. Hør hvordan Henrik Balslev senior digital director hos Viking har løftet den opgave.
Job & Karriere
Regner din ferie væk? Brug tiden på at søge en af disse otte stillinger, der er ledige netop nu
Det sjasker ned over hele Danmark. Du kan bruge de våde sommerdage på at søge et af disse otte job, der er ledige lige nu.
White paper
Hybrid infrastruktur giver Jutlander Banks medarbejdere mere tid til kunderne
Hos Jutlander Bank sørger den nye, hybride infrastruktur fra HPE for, at bankens kunderådgivere i dag kan bruge væsentlig mere tid hos den enkelte kunde. I denne kundecase kan du få indsigt i hvordan IT-chef Kim Meling Christensen har oplevet samarbejdet med Atea og HPE – samt hvilke kundevendte fordele og muligheder for automatisering som det har givet.