Hvordan kan man erstatte mellemrum med +´er?

er det det her du mangler?

formular:

formnavn = Request.Form("formnavn")
formnavn = Replace(formnavn, " ", "+")

QueryString:
<%
hej = Request.Querystring("hej")
hej = Replace(hej, " ", "+")

<%
streng = "saving private ryan"
streng = replace(streng," ","+")
link = "http://www.imdb.com/find?" & streng
response.write link
%>

\Dan

Du kan køre din streng gennem Server.URLEncode

det blev jeg ikke meget klogere af, med mindre man kun vil bruge titlen Saving Private Ryan. - Kan I ikke pensle det lidt ud - for en relativ begynder.

OK!
Her antager jeg at din database hedder "data.mdb" og ligger i samme mappe som asp-scriptet. Ligeledes antager jeg også at tabellen i din database hedder "film" og at kollonnen vi skal kigge i hedder "titel"...
Så ville det være sådan her:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("data.mdb")
set rs = Conn.execute("select * from film")
if NOT rs.EOF then
do until rs.EOF
titel = rs("titel")
titelmedplus = replace(titel," ","+")
response.write "<a href=""http://www.imdb.com/find?s=all&q=" & titelmedplus & """ target=""_blank"">" & titel & "</a>"
rs.movenext
loop
else
response.write "Ingen film fundet!"
end if
rs.close
set rs=nothing
Conn.close
set Conn=nothing
%>

- mere kan det vel næppe pensles ud...

\Dan

RETTELSE!!! Sådan her skal det være:


<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("data.mdb")
set rs = Conn.execute("select * from film")
if NOT rs.EOF then
do until rs.EOF
titel = rs("titel")
titelmedplus = replace(titel," ","+")
response.write "<a href=""http://www.imdb.com/find?s=all&q=" & titelmedplus & """ target=""_blank"">" & titel & "</a>"
rs.movenext
loop
else
response.write "Ingen film fundet!"
end if
rs.close
set rs=nothing
Conn.close
set Conn=nothing
%>

Nej sådan her:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("data.mdb")
set rs = Conn.execute("select * from film")
if NOT rs.EOF then
do until rs.EOF
titel = rs("titel")
titelmedplus = replace(titel," ","+")
%>
<a href="http://www.imdb.com/find?s=all&q=<%=titelmedplus%>" target="_blank"><%=titel%></a>
<%
rs.movenext
loop
else
response.write "Ingen film fundet!"
end if
rs.close
set rs=nothing
Conn.close
set Conn=nothing
%>

Jeg holder stadigvæk på URLEncode, den tager også højde for andre specialtegn

titelmedplus = Server.URLEncode(titel)