işini görecek
ASP kodlarının tamamı aşağıda. ama çok kabaca bir haliyle.
HTML düzenleme sana ait.
ek bilgi;
ASP dosyasının adı : metin.
ASP
veritabanı adı : database.mdb ( metin.
ASP ile aynı klasörde olacak, eğer farklı bir klasörde olursa servermappath'ten sonra olan düzenlemeyi yapman gerekir.)
tablo adı : yazi
tablo alanları : yazi_id, baslik, metin
<%yazi_id=Request.QueryString("yazi_id")%>
<%
if yazi_id="" then yazi_id=1
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("database.mdb")
Set dbc = server.CreateObject("ADODB.Connection")
dbc.open strConn
Dim rs
Set rs = server.CreateObject ("ADODB.Recordset")
SQL = "Select * FROM yazi where yazi_id="&yazi_id
rs.Open SQL, dbc
if not rs.EOF then
%>
<%=rs("baslik")%><br><br>
<%=rs("metin")%>
<%
end if
rs.Close
Set rs = Nothing
%>
<br><br>
<%
Set rs = server.CreateObject ("ADODB.Recordset")
rs.Open "yazi", dbc,adopenforvardonly
%>
<%while not rs.EOF %>
<a href="metin.ASP?yazi_id=<%=rs("yazi_id")%>"><%=rs( "baslik")%></a> |
<%rs.Movenext
wend
rs.Close
Set rs = Nothing
%>
az önce ufak bir hata vardı
tam kodlar bunlar. yine de hata verirse bakarız...