her er kilden:
soeg_formular.asp
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("/testrapport/database/testrapport.mdb")
mode = Request.QueryString("mode")
scriptname = Request.ServerVariables("SCRIPT_NAME")
if request.querystring("vareNR"&"") <> "" then
strSQL = "SELECT * FROM info WHERE varenummer=" & request.querystring("vareNR")&""
Set RS = Conn.Execute(strSQL)
end if
if request.querystring("vareNR"&"") <> "" then
strSQL = "SELECT * FROM varenavn WHERE varenummer=" & request.querystring("vareNR")&""
Set RS3 = Conn.Execute(strSQL)
end if
%>
<html>
<head></head>
<title>Fejlrapport</title>
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1">
<meta name="generator" content="HAPedit 3.1">
<style type="text/css">
h3{font-size: 100%;margin:0;padding: 0 0 3px;background: #FFC5FF;color: #000;text-align: center}
</style>
<link rel="stylesheet" type="text/css" href="roundedPage.css">
<link rel="stylesheet" type="text/css" href="niftyCorners.css">
<link rel="stylesheet" type="text/css" href="niftyPrint.css" media="print">
<script type="text/javascript" src="nifty.js"></script>
<script type="text/javascript" src="final.js"></script>
</head>
<body>
<div id="container"><div id="header"><h1>Rapport</h1></div>
<div id="menu">
<ul id="nav">
<li id="home"><a href="/testrapport/">Forside</a></li>
<li id="who"><a href="/testrapport/upload_formular.asp">Vedhæft filer</a></li>
<li id="prod"><a href="/testrapport/tilfoej_varenummer.asp">Tilføj varenummer</a></li>
<li id="prod" class="active"><a href="/testrapport/soeg.asp">Rapport</a></li>
<li id="prod"><a href="/testrapport/rediger.asp">Rediger</a></li>
</ul>
</div>
<div id="container></div>
<div id="content">
<center>
<h4>Testrapport for <% response.write rs3("produkt") %></h4>
</center>
<%
do
response.write "<div class='box'>"
response.write "<b>Dato:</b>"& rs("dato") &"<br><b>Rapport nr.: </b>"& rs("id") & "</diV>"
response.write "<div class='box'><i><b><tekst>Beskrivelse<br></i></b>" & rs("beskrivelse") & "</div></tekst>"
response.write "<div class='news'"
response.write " <tr>"
response.write " <td><i><b>Udført af: </i></b>"
response.write " </td>"
response.write " <td>"& rs("udfort")
response.write " </td>"
response.write " </tr>"
response.write " </table>"
response.write "</div>"
set rs2 = conn.execute("SELECT * FROM filer WHERE idnummer=" & rs("id")&"")
response.write "<div id='minipics'>"
while not rs2.eof
response.write"<ul><li><a href="""& rs2("url") &""" STYLE='text-decoration: none'><img src="""& rs2("url") &""" ></a></li></ul>"
rs2.movenext
wend
rs.MoveNext
response.write "<br><div id='content'></div>"
Loop While Not rs.EOF
%>
</body>
</html>
Ny bruger
Nybegynder
Opret
Preview
