Hjælp til select statement

Okay det lyder nemt og det håber jeg også det er ! her er de nødvendige oplysninger

Jeg har pasted mit script herind. Som i kan se forventer den man sender en iPic med i sin url. iPic er her et ID altså et nummer.
Hvad og hvor skal jeg ændre hvis jeg nu istedetfor for et ID sender et navn med? hvad skal ændres?

Den kolonne som der skal søges i istedet for i PIC_ID er PIC_NAME
som er af datatypen tekst.



<%
Dim rsPicEdit__MMColParam
rsPicEdit__MMColParam = "1"
if (Request.QueryString("iPic") <> "") then rsPicEdit__MMColParam = Request.QueryString("iPic")
%>

<%
set rsPicEdit = Server.CreateObject("ADODB.Recordset")
rsPicEdit.ActiveConnection = MM_connDUgallery_STRING
rsPicEdit.Source = "SELECT *  FROM PICTURES  WHERE PIC_ID = " + Replace(rsPicEdit__MMColParam, "'", "''") + ""
rsPicEdit.CursorType = 0
rsPicEdit.CursorLocation = 2
rsPicEdit.LockType = 3
rsPicEdit.Open()
rsPicEdit_numRows = 0
%>