Fejl i opsætning af recorder på script
Kan nogle hjælpe med at få min side til at virke ??Den skulle vise alle indlæg fra tabel B order by dennes id men min side viser kun den første record men over 10 gange !????
http://www.javacoder.dk:56400/joins/show.asp
min side code er:
<html>
</html>
<head>
</head>
<body>
<p align="center">
<b>MULTI JOINS eks. - Show</b><br>
<a href="admin_opret.asp">Opret nyt sammenhæng</a>
</p>
<table width="260" border="0" cellpadding="0" cellspacing="0">
<%
Dim cn
Dim cnStr
Dim sql
Dim rs
Dim strSQL
Dim str
Dim strLName
Dim strENumber
Dim strEName
cnStr = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath ("db.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open cnStr
strSQL = "SELECT DISTINCT B.id,B.employee_number,C.employee_name,A.location_name FROM B,C,A WHERE A.location_code = B.location_code AND B.employee_number=C.employee_number"
Set rs = cn.Execute(strSQL)
strENumber = rs("employee_number")
strEName = rs("employee_name")
strLName = rs("location_name")
If Not (rs.BOF or rs.EOF) Then
response.write "<form name=""deliting"" action=""admin_del.asp"" method=""post"">"
Do While Not rs.EOF
response.write "<tr><td>" & strENumber & "</td><td>" & strEName & "</td><td>" & strLName & "</td><td>"
response.write "<input type=""checkbox"" name=""ids"" value=" & rs("id") & ">"
response.write "</td></tr>"
rs.MoveNext
Loop
Response.Write "<tr><td colspan=""4"" align=""right"">"
Response.Write "<input type=""submit"" name=""btnDelete"" value=""Slet de valgte Records""></form>"
Response.Write "</td></tr>"
Response.Write "</table>"
Else
Response.write "<font face=""Arial"" size=""2"">No Records</font>"
End If
cn.Close
Set cn = Nothing
%>
</body>
</html>
Håber nogle vil hjælpe !??
