Du kan søge i tekstfelter med LIKE således:
<!-- METADATA TYPE="typelib" uuid="00000205-0000-0010-8000-00AA006D2EA4" -->
<%
sql = "" & _
"SELECT * " & _
"FROM post " & _
"WHERE besked LIKE '%' + ? + '%'"
' INDSÆT DIN KODE TIL AT OPRETTE EN CONNECTION HER!!!
set cmd = Server.CreateObject("ADODB.Command")
set cmd.ActiveConnection = conn
cmd.Parameters.Append cmd.CreateParameter("@soegetekst", adVarChar, adParamInput, 250, soegetekst)
set rs = cmd.Execute()
do while not rs.eof
' GØT HVAD DER NU SKAL GØRES MED DE FUNDNE RÆKKER
rs.movenext
loop
rs.close
set rs = nothing
%>
Mht. sletningen, så er der (mindst) to metoder du kan benytte. Den ene udnytter at value-atributteb fra form-elementer med samme name-atribut i formularen, samles i en kommasepareret streng i Request.Form (sammen gør sig gældende for Request.QueryString). Denne streng kan du bruge til at slette en mængde med i databasen (hvis du eller tør gør dette uden videre :-)). Det kunne se såledse ud:
sql = "DELETE " & _
"FROM post " & _
"WHERE bId IN (" & Request.Form("checkboxDerVælgerPostTilSletning") & ")"
conn.execute sql
Ovenstående kræver naturligvis at du har valgt en intelligent måde at identificere hver brev i formularen (dvs. det id som identificerer brevet i databasen), ellers skal sql-sætningen nok se anderledes ud ;-)
En anden metode er batchsletning vha. command-objektet, hvis du aætter et commandobjekt op til at slette en post i databasen og derefter genbruger dette objekt ved blot at udskifte parameteren til objektet. Det kunne se således ud:
sql = "DELETE " & _
"FROM post " & _
"WHERE bID = ?"
set cmd = Server.CreateObject("ADODB.Command")
set cmd.ActiveConnection = conn
cmd.CommandText = sql
cmd.CommandType = adCmdText
cmd.Parameters.Append cmd.CreateParameter("@id", adInteger, adParamInput, 4)
arrPost = split(Request.Form("checkboxDerVælgerPostTilSletning"),",")
for each postid in arrPost
cmd.Parameters("@id").Value = postid
recordCount = 0
cmd.Execute recordCount
if recordCount = 0 then
response.write "Post med id: " & post & " kunne IKKE slettes!"
end if
next
Den første metode til sletning er den hurtigste, men den sidste er den sikreste. Du kunne evt. udvide den med en parameter mere som angav ejeren af brevet, så det kun er den brugere der ejer brevene som kan slette disse. Til dette skulle du bare smide ejerens id ind i sql-sætningen. Nogenlunde således:
sql = "DELETE " & _
"FROM post " & _
"WHERE bID = ? " & _
"AND ejerid = ?"
Command-objektet skulle naturligvis tilpasses så den også sender ejerid'et med som parameter.
Læs mere om brugen af command-objektet i min artikel:
http://www.eksperten.dk/artikler/1250