Avatar billede plato Juniormester
26. november 2002 - 20:04 Der er 16 kommentarer og
1 løsning

Hjælpe mig. Haster. ASP

Hejsa gruppe..

Er der en venlig sjæl der kan hjælpe mig.

Jeg smider lige en kode nedenfor. Jeg er ved at lave en database til mine film. Men skidtet virker ikke.
Se selv : http://www.trailersiden.dk/test/default.asp

Nogen der har et bud?

<%

Response.Buffer = True

mode = Request.QueryString("mode")

'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("trailer.mdb")



strSQL = "SELECT * FROM sider WHERE id LIKE '"  & Request.QueryString("id") & "'"

rs.Open strSQL, objConn , 2, 3
Dim titel
Dim pic
Dim tlink
Dim omtale
Dim premiere
Dim skuespil
Dim instruk
Dim studio
Dim genre
Dim tid
Dim hp-link
Dim hp-tekst

titel = rs.fields("titel").value
pic = rs.fields("pic").value
tlink = rs.fields("tlink").value
omtale = rs.fields("omtale").value
premiere = rs.fields("premiere").value
skuespil = rs.fields("skuespil").value
instruk = rs.fields("instruk").value
studio = rs.fields("studio").value
genre = rs.fields("genre").value
tid = rs.fields("tid").value
hp-link = rs.fields("hp-link").value
hp-tekst = rs.fields("hp-tekst").value
%>


<html>
<head>
<title><%=titel%></title>
<link rel="stylesheet" type="text/css" href="../style.css">


</head>
<body bgcolor="#efefef" text="#000000" leftmargin="5" topmargin="0" bottommargin="0" marginwidth="0" marginheight="0" style="overflow:auto">
<span id="font">Trailers » Sektion A » <%=titel%></span>
<br>  <br>    

<center>
<table border="0" cellspacing="0" cellpadding="0" width="70%">
    <tr>
        <td width="80%" valign="top">
       
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td class="menuc" width="140"><b>Premiere:</b></td>
                    <td class="menuc"><%=premiere%></td>
            </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td valign="top" class="menuc" width="140"><b>Skuespillere:</b></td>
                    <td class="menuc"><%=skuespil%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Instruktør:</b></td>
                    <td class="menuc"><%=instruk%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td class="menuc" width="140"><b>Studio:</b></td>
                    <td class="menuc"><%=studio%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Genre:</b></td>
                    <td class="menuc"><%=genre%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Spilletid:</b></td>
                    <td class="menuc"><%=tid%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Officiel HP:</b></td>
                    <td class="menuc"><a href="<%=hp-link%>" target="_new"><%=hp-tekst%></a></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td colspan="3"><a href="<%=tlink%>"><b>»</b> <u>Afspil Trailer [Quicktime]</U></a></td>
                </tr>   
            </table>
        </td>
   
        <td align="right"><img src="../pics/<%=pic%>" width="200" height="300" border="0"></a></td>
    </tr>   
    <tr>
        <td  colspan="2"><span id="font2"><%=omtale%>
                           
        </td>
    </tr>

</table>
<br>
<table border="0" cellspacing="0" cellpadding="0" width="70%">
    <tr>
        <td width="80%" valign="top">
<img src="s5.gif">
<form action="abeautifulmind.asp" method="post">
<input type="hidden" name="stempaa" value="246">
<input type="radio" name="karakter" value="1">1
<input type="radio" name="karakter" value="2">2
<input type="radio" name="karakter" value="3">3
<input type="radio" name="karakter" value="4">4
<input type="radio" name="karakter" value="5">5
<input type="submit" name="Stem" value="Stem">
</form>

       
                            <a href="trailersa.html"><b>Tilbage</b></a></td>
    </tr>
</table>
</body>
</html>
Avatar billede plato Juniormester
26. november 2002 - 20:05 #1
Der skal lige ses borte fra det sidste. Det er en stemmetabel som virker i forvejen.
Avatar billede whatever Nybegynder
26. november 2002 - 20:07 #2
Du må ikke have en - i variabelnavnet.
Avatar billede whatever Nybegynder
26. november 2002 - 20:08 #3
Istedet kan du bruge en _
Avatar billede plato Juniormester
26. november 2002 - 20:08 #4
Jeg har ikke selv lavet koden.

Så du er nød til at uddybe. Jeg kan godt læse, men ikke forstå hvad du skriver. ;-)
Avatar billede plato Juniormester
26. november 2002 - 20:10 #5
Du mener hp-link?
Avatar billede whatever Nybegynder
26. november 2002 - 20:12 #6
Prøv dette:


<%

Response.Buffer = True

mode = Request.QueryString("mode")

'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("trailer.mdb")



strSQL = "SELECT * FROM sider WHERE id LIKE '"  & Request.QueryString("id") & "'"

rs.Open strSQL, objConn , 2, 3
Dim titel
Dim pic
Dim tlink
Dim omtale
Dim premiere
Dim skuespil
Dim instruk
Dim studio
Dim genre
Dim tid
Dim hp_link
Dim hp_tekst

titel = rs.fields("titel").value
pic = rs.fields("pic").value
tlink = rs.fields("tlink").value
omtale = rs.fields("omtale").value
premiere = rs.fields("premiere").value
skuespil = rs.fields("skuespil").value
instruk = rs.fields("instruk").value
studio = rs.fields("studio").value
genre = rs.fields("genre").value
tid = rs.fields("tid").value
hp_link = rs.fields("hp-link").value
hp_tekst = rs.fields("hp-tekst").value
%>


<html>
<head>
<title><%=titel%></title>
<link rel="stylesheet" type="text/css" href="../style.css">


</head>
<body bgcolor="#efefef" text="#000000" leftmargin="5" topmargin="0" bottommargin="0" marginwidth="0" marginheight="0" style="overflow:auto">
<span id="font">Trailers » Sektion A » <%=titel%></span>
<br>  <br>   

<center>
<table border="0" cellspacing="0" cellpadding="0" width="70%">
    <tr>
        <td width="80%" valign="top">
       
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td class="menuc" width="140"><b>Premiere:</b></td>
                    <td class="menuc"><%=premiere%></td>
            </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td valign="top" class="menuc" width="140"><b>Skuespillere:</b></td>
                    <td class="menuc"><%=skuespil%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Instruktør:</b></td>
                    <td class="menuc"><%=instruk%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td class="menuc" width="140"><b>Studio:</b></td>
                    <td class="menuc"><%=studio%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Genre:</b></td>
                    <td class="menuc"><%=genre%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Spilletid:</b></td>
                    <td class="menuc"><%=tid%></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>   
                    <td class="menuc" width="140"><b>Officiel HP:</b></td>
                    <td class="menuc"><a href="<%=hp_link%>" target="_new"><%=hp_tekst%></a></td>
                </tr>
            </table>
            <br>
            <Table border="0" cellpadding="0" cellspacing="0">
                <tr>
                    <td colspan="3"><a href="<%=tlink%>"><b>»</b> <u>Afspil Trailer [Quicktime]</U></a></td>
                </tr>   
            </table>
        </td>
   
        <td align="right"><img src="../pics/<%=pic%>" width="200" height="300" border="0"></a></td>
    </tr>   
    <tr>
        <td  colspan="2"><span id="font2"><%=omtale%>
                           
        </td>
    </tr>

</table>
<br>
<table border="0" cellspacing="0" cellpadding="0" width="70%">
    <tr>
        <td width="80%" valign="top">
<img src="s5.gif">
<form action="abeautifulmind.asp" method="post">
<input type="hidden" name="stempaa" value="246">
<input type="radio" name="karakter" value="1">1
<input type="radio" name="karakter" value="2">2
<input type="radio" name="karakter" value="3">3
<input type="radio" name="karakter" value="4">4
<input type="radio" name="karakter" value="5">5
<input type="submit" name="Stem" value="Stem">
</form>

       
                            <a href="trailersa.html"><b>Tilbage</b></a></td>
    </tr>
</table>
</body>
</html>
Avatar billede plato Juniormester
26. november 2002 - 20:13 #7
Det prøver jeg..

Jeg fattede lige pludselig hvad du mente. Så jeg lavede hp-link og hp-tekst om til hplink og hptekst. Både i ASP filen og databasen. Men det virkede ikke.
Avatar billede whatever Nybegynder
26. november 2002 - 20:18 #8
Giver det samme fejl?
Avatar billede plato Juniormester
26. november 2002 - 20:18 #9
Ja.. Det er som om default.aså slet ikke er der.
Avatar billede whatever Nybegynder
26. november 2002 - 20:21 #10
Lige efter denne:

Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("trailer.mdb")

Indsætter du denne:

Set rs = Server.CreateObject("ADODB.Recordset")
Avatar billede plato Juniormester
26. november 2002 - 20:23 #11
Det virker heller ikke.

Det er vel ikke sådan jeg kunne sende dig ASP filen og databasen?
Avatar billede whatever Nybegynder
26. november 2002 - 20:28 #12
Jo det kan du godt. Send den på jbs@efusion.it
Avatar billede plato Juniormester
26. november 2002 - 20:30 #13
Tak.. Det er sendt.. *S*
Avatar billede mccannon Nybegynder
27. november 2002 - 06:04 #14
prøv lige det her
<%

Response.Buffer = True

mode = Request.QueryString("mode")

'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("trailer.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")


strSQL = "SELECT * FROM sider WHERE id LIKE '"  & Request.QueryString("id") & "'"
rs.Open strSQL, objConn
Dim titel
Dim pic
Dim tlink
Dim omtale
Dim premiere
Dim skuespil
Dim instruk
Dim studio
Dim genre
Dim tid
Dim hp_link
Dim hp_tekst

titel = rs("titel")
pic = rs("pic")
tlink = rs("tlink")
omtale = rs("omtale")
premiere = rs("premiere")
skuespil = rs("skuespil")
instruk = rs("instruk")
studio = rs("studio")
genre = rs("genre")
tid = rs("tid")
hp_link = rs("hp-link")
hp_tekst = rs("hp-tekst")
Avatar billede mccannon Nybegynder
27. november 2002 - 06:05 #15
hov glemte lige noget

<%

Response.Buffer = True

mode = Request.QueryString("mode")

'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("trailer.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")


strSQL = "SELECT * FROM sider WHERE id LIKE '"  & Request.QueryString("id") & "'"
rs.Open strSQL, objConn
IF not RS.EOF THEN
Dim titel
Dim pic
Dim tlink
Dim omtale
Dim premiere
Dim skuespil
Dim instruk
Dim studio
Dim genre
Dim tid
Dim hp_link
Dim hp_tekst

titel = rs("titel")
pic = rs("pic")
tlink = rs("tlink")
omtale = rs("omtale")
premiere = rs("premiere")
skuespil = rs("skuespil")
instruk = rs("instruk")
studio = rs("studio")
genre = rs("genre")
tid = rs("tid")
hp_link = rs("hp-link")
hp_tekst = rs("hp-tekst")
END IF
Avatar billede plato Juniormester
27. november 2002 - 10:52 #16
mccannon.
whatever har løst det ;o)

whatever...
Vil du ikke have dine point?
Avatar billede whatever Nybegynder
27. november 2002 - 11:56 #17
jo tak.
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