Connect til db
HeysaHer skaber jeg kontakt med min db via DNS, men hvis jeg nu ønsker at gøre det uden brug af dns, for når jeg uploader skidtet så kan den jo ikke burge den dns som jeg har lavet på min egen puter, håber i fatter mig :)
Her er en stump kode så i bedre kan se hvad jeg mener:
<%
dim conn
dim rs
set conn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")
conn.Open "DSN=rate"
rs.ActiveConnection = conn
rs.Open "SELECT * FROM rate ORDER BY title ASC"
while not rs.EOF
%>
<html>
<head>
<!-- Minus AutoDato -->
<META NAME="Generator" CONTENT="Stone's WebWriter 3">
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<form name="frmRate<%=rs.Fields(0).value%>" action="rate/rate.asp" method="post">
<input type="hidden" name="cdId" value="<%=rs.Fields(0).value%>">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><font face="Verdana" size="2" color="black">
Vurdere denne artikel: <%=rs.Fields(1).Value%>
<%=ShowRating(rs.Fields(0).Value)%>
</font></td></tr><tr>
<td bgcolor="black">
<font face="Verdana" size="1" color="black">
<%
for i = 1 to 10
Response.Write " " & i & " <input name='rating' type='radio' value='" & i & "'> "
next
%>
</font>
<input type="submit" value="Vurdere" style="background-color: #FFFFFF; border: 1 solid #000000">
</td>
</tr>
</table>
</form>
Hilsen Dalton
