E' possibile stampare a video solo una determinata lettera di una lista database?

[Artgallery75]

Ho uno script che stampa a video un database.
E' possibile con una semplice riga di comando far caricare solamente le modelle con una lettera scelta?
Esempio: voglio vedere tutte le modelle con la lettera c. Io clicco su c e mi appaiono solo quelle con il nome che inizia con c.

Questo è il link:
http://www.artgallery75.com/modelle.asp

Questo è loscript:
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/fpdb/casting.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM modelle ORDER BY nome"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,4

do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#000000"
intSfondo="#FFFFFF"
else
intVolta="1"
intTesto="#000000"
intSfondo="#CAE8D6"
end if
%>
<TR bgcolor="<%=intSfondo%>">
<TD width="153" height="27"><p align="left" style="margin-left: 5"><%=rs(1)%></p></TD>
<TD width="531" height="27"><p align="left" style="margin-left: 5"><%=rs(2)%>
<span style="font-size: 9pt">- N.B.= Clicca sulla foto per vedere la scheda
della modella!!!</span></p></TD>
<TD width="42" height="27" align="center"><a href="#" onClick="window.open('<%=rs(3)%>','popup','resizab le=yes,width=740,height=550');">
[img]<%=rs(4)%>[/img]</a></TD>
</TR>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>

Se mi date una mano posso ricambiare dandovi una mano per dei chiarimenti riguardanti photoshop e flash.

un saluto a tutti gli amici del forum che sono sempre molto gentili!!!

[cipcip]

nome=request.form("nome")

SELECT * FROM modelle WHERE WHERE Name LIKE 'nome%'

sostituisci con questo

[Artgallery75]

Lo script che ho postato va bene..
Vorrei semplicemente che quando un utente clicchhi cu a apra un'altra pagina chiamata per esempio modelle_a.asp e che dal database prelevi solo le modelle con il nome che inizia per A.

[longline]

Lo script che hai postato va bene, ma ti restituisce tutte le modelle. Per fare ciò che chiedi dovresti usare il tuo script in tutte le pagine di ogni lettera (a.asp, b.asp, ecc...) usando ogni volta un sql diverso:

1) in a.asp: sql = "SELECT * FROM modelle WHERE nome LIKE 'a%' ORDER BY nome"
2) in b.asp: sql = "SELECT * FROM modelle WHERE nome LIKE 'b%' ORDER BY nome"
3) in c.asp: sql = "SELECT * FROM modelle WHERE nome LIKE 'c%' ORDER BY nome"
ecc...

Però, questo è un affronto all'ottimizzazione, per cui è meglio fare una sola pagina asp comune a tutte le iniziali, a cui passi appunto la lettera iniziale con cui filtrare dinamicamente i nomi delle modelle:

Ogni pagina sarà chiamata così:
1) http://www.artgallery75.com/modelle.asp?iniziale=a
2) http://www.artgallery75.com/modelle.asp?iniziale=b
3) http://www.artgallery75.com/modelle.asp?iniziale=c
ecc...

La pagina modelle.asp conterrà lo stesso tuo codice, ma con queste linee:

Dim strIniziale
strIniziale = Request("iniziale")

sql = "SELECT * FROM modelle WHERE nome LIKE '" & iniziale & "%' ORDER BY nome"

[Artgallery75]

Ciao, ti ringrazio ma non va...
Praticamente inizialmente devono apparire tutte le modelle e poi se uno vuole può sceglierle per lettera.
Dov'è che sbaglio?

Io ho fatto così:

<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
dim strIniziale strIniziale = Request("iniziale")

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/fpdb/casting.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM modelle ORDER BY nome"
sql = "SELECT * FROM modelle WHERE nome LIKE '" &amp; iniziale &amp; "%' ORDER
BY nome"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,4

do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#000000"
intSfondo="#FFFFFF"
else
intVolta="1"
intTesto="#000000"
intSfondo="#CAE8D6"
end if
%>
<TR bgcolor="<%=intSfondo%>">
<TD width="153" height="27"><p align="left" style="margin-left: 5"><%=rs(1)%></p></TD>
<TD width="531" height="27"><p align="left" style="margin-left: 5"><%=rs(2)%>
<span style="font-size: 9pt">- N.B.= Clicca sulla foto per vedere la scheda
della modella!!!</span></p></TD>
<TD width="42" height="27" align="center"><a href="#" onClick="window.open('<%=rs(3)%>','popup','resizab le=yes,width=740,height=550');">
[img]<%=rs(4)%>[/img]</a></TD>
</TR>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>

Ciao

[cipcip]

non va cperche ti sei inventato una stringa sql inesistente quella giusta e quella che ti ho postato io o il collega

quella mia ho messo un where di troppo

[Artgallery75]

Ciao.
Ho notato però non funziona lo stesso.

Grazie lo stesso

[optime]

che vuol dire "non funziona" ?

[Artgallery75]

Se faccio le singole pagine tutto va ma se inserisco una nuova stringa per le lettere non funziona più niente!!

Un'altra domanda.

E' possibile inserire una stringa con una gif new per le nuove modelle o per le modelle con foto o curriculum aggiornato che ogni 30 giorni si aggiorna?

Esempio: Barbarella si iscrive il 1 di gennaio e quindi appare la gif new. Passano trenta giorni e la gif new sparisce.

Ciao e grazie per l'aiuto.

[optime]

fatti stampare la stringa sql prima di eseguirla e postala, cosi' vediamo se e' ok