Este case no me funciona

[dobled]

Que tendrá de malo al parecer NADA

Código PHP:

  Dim NxSearch 
NxSearch = Request.Form("asistente") 
 
Select Case NxSearch 
    Case "all" 
                NxSQL ="SELECT * FROM ipfichaprod ORDER By id_ficha" 
    Case "T" 
                NxSQL ="SELECT * FROM ipfichaprod WHERE estado = "terminada" ORDER By id_ficha" 
    Case "P" 
                NxSQL ="SELECT * FROM ipfichaprod WHERE estado = "pendiente" ORDER By id_ficha" 
    Case Else 
                NxSQL ="SELECT * FROM ipfichaprod WHERE asistente = '"&NxSearch&"' ORDER By id_ficha" 
 
End Select 
 
Set RS = Server.CreateObject("ADODB.Recordset") 
RS.Open NxSQL, oConn,3,1  
   

Me dice que no me puede mostrar la pagia solicitada.

[RootK]

Select Case NxSearch
Case "all"
NxSQL ="SELECT * FROM ipfichaprod ORDER By id_ficha"
Case "T"
NxSQL ="SELECT * FROM ipfichaprod WHERE estado = "terminada" ORDER By id_ficha"
Case "P"
NxSQL ="SELECT * FROM ipfichaprod WHERE estado = "pendiente" ORDER By id_ficha"
Case Else
NxSQL ="SELECT * FROM ipfichaprod WHERE asistente = '"&NxSearch&"' ORDER By id_ficha"

End Select

Ya checaste tus comillas...??? , mas bien tu cadena que dice where... irían comillas simples no dobles..

Prueba con esto

Select Case NxSearch
Case "all"
NxSQL ="SELECT * FROM ipfichaprod ORDER By id_ficha"
Case "T"
NxSQL ="SELECT * FROM ipfichaprod WHERE estado = 'terminada' ORDER By id_ficha"
Case "P"
NxSQL ="SELECT * FROM ipfichaprod WHERE estado = 'pendiente' ORDER By id_ficha"
Case Else
NxSQL ="SELECT * FROM ipfichaprod WHERE asistente = '"&NxSearch&"' ORDER By id_ficha"

End Select

Suerte

[dobled]

Gracias .....
Las comillas siempre me han penado---