01. juli 2003 - 13:33
Der er
7 kommentarer og 1 løsning
Udskriv link fra database..
Hejsa Hvordan kan det være at når jeg opretter et "link" så kommer det til at se sådan ud : , Start.asp?mode=rediger&id=115 istedet for Start.asp?mode=rediger&id=115 Hvordan for jeg løst det problem ?
Annonceindlæg fra inspirit365
Jeg vil gætte på at det har noget at gøre med din HTML kode, dog akn jeg ikke se det ud af den lille bid du har publiseret. Bruger de Checkbuttoms får du retureneret væredierne som en , sep steng hvis du har flere felter med samme navn, det kunne være det samme selv om det nettop er ideen med radio buttons
Soes > din kode virker ikke :( Jeg poster lige koden : ------------ <% If Not Session("login") = "Authed" Then Response.Redirect("default.asp") End If %> <% '---- CursorTypeEnum Values ---- Const adOpenForwardOnly = 0 Const adOpenKeyser = 1 Const adOpenDynamic = 2 Const adOpenStatic = 3 '---- LockTypeEnum Values ---- Const adLockReadOnly = 1 Const adLockPessimistic = 2 Const adLockOptimistic = 3 Const adLockBatchOptimistic = 4 response.buffer = true con= "Provider=Microsoft.Jet.OleDB.4.0; Data Source=" & Server.MapPath("db.mdb") if request.querystring = "write" then sql = "SELECT * FROM Links WHERE (id=0) " set rs = server.createobject ("adodb.recordset") rs.locktype = adlockoptimistic rs.cursortype = adopendynamic rs.open sql, con rs.addnew rs ("Titel") = trim(request.form("Titel")) rs ("Url") = trim(request.form("Url")) rs ("placering") = trim(request.form("placering")) rs.update rs.close set rs = nothing %> <!-- #Include file="top.asp" --> <table border="0" width="100%"> <tr> <td><font face="verdana" size="2"><img src="images/icon/dokumenter.gif"><b>Sider</b></td> </tr> <tr> <td height="2" bgcolor="#889DB7"></td> </tr> <tr> <td> <font face="verdana" size="2"> <i><b>Siden er nu blevet oprettet!<br> Husk at oprette et link til siden, dette kan gøres under menupunkter > Opret menupunkt.</b></i> </font> </td> </tr> </table> <!-- #Include file="bund.asp" --> <% else %> <!-- #Include file="top.asp" --> <form action="?write" method="post"> <table border="0" width="100%"> <tr> <td colspan="2" ><font face="verdana" size="2"><img src="images/icon/dokumenter.gif"><b>Sider</b></td> </tr> <tr> <td colspan="2" height="2" bgcolor="#889DB7"></td> </tr> <tr> <td colspan="2"> <font face="verdana" size="2"> <i>Ud fyld alle felter!</i><br><br> </font> </td> </tr> <tr> <td><font face="verdana" size="2">Titel:</font></td> <td width="85%"><input name="Titel" type="text"></td> </tr> <tr> <td><font face="verdana" size="2">URL:</font></td> <td width="85%"><input name="URL" type="text"><input name="placering" type="hidden" Value="10"></td> </tr> <tr> <td colspan="2"> <font face="verdana" size="2"> <br><b>Sider</b><br> <hr style="height: 1px; color: #000000;"> </font> </td> </tr> <% Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb") Conn.Open DSN sletSQL = "SELECT * FROM Sider order by id" set rs = conn.execute(sletSQL) if not rs. eof then do while not rs.eof %> <tr> <td><input type="radio" value="<%= rs("URL") %><%= rs("ID") %>" name="Url" ></td> <td><font face="verdana" size="2"><%= rs("Titel") %></font></td> </tr> <% rs.movenext loop end if %> <tr> <td colspan="2"> <hr style="height: 1px; color: #000000;"> </td> </tr> <tr> <td colspan="2"><input type="submit" value="Opret"> <input type="button" value="Annuller" onClick="java script: history.go(-1)"></td> </tr> </form> </table> <!-- #Include file="bund.asp" --> <% end if %> ------------------ Håber i kan hjælpe :)