condizione contiente

[slay]

ahh.. che mattinata...
devo fare questa condizione

<% if rs("zona") = "Citta" però al posto di = vorrei mettere contiente qul'è il simbolo del contiene?

[Mems]

if inStr(variabile,"valore") > 0 then
' il valore c'è
end if

[slay]

si ma in base al valore faccio l'operazione ... questo è il codice che ho:

<select name="form_zona" id="form_luogo" tabindex="9">
              <option <% if rs("zona") = "Citta"     then %> selected="selected" <%else%>  <%end if%> value="Citta">Citta</option>
              <option <% if rs("zona") = "Montagna" then %> selected="selected" <%else%>  <%end if%> value="Montagna">Montagna</option>
              <option <% if rs("zona") = "Lago"        then %> selected="selected" <%else%>  <%end if%> value="Lago">Lago</option>
              <option <% if rs("zona") = "Collina"     then %> selected="selected" <%else%>  <%end if%> value="Collina">Collina</option>
              <option <% if rs("zona") = "Mare"     then %> selected="selected" <%else%>  <%end if%> value="Mare">Mare</option>
              <option <% if rs("zona") = "Campagna" then %> selected="selected" <%else%>  <%end if%> value="Campagna">Campagna</option>
              <option <% if rs("zona") = "Terme"     then %> selected="selected" <%else%>  <%end if%> value="Terme">Terme</option>
              <option <% if rs("zona") = "Pianura"     then %> selected="selected" <%else%>  <%end if%> value="Pianura">Pianura</option>
              </select> 

praticamente non mi mostra il selected giusto..

[Mems]

Scusa, ma ste voci, citta, mare, collina, etc... dove stanno? Nel db?

[slay]

si esatto stanno nel db inserite precedentemente tramite form a discesa ...

[Mems]

A me quella select pare statica...

[slay]

il codice che ho postato praticamente serve per un update... praticamente l'utente inserisce un form nome, via, telefono e tramite un campo select la zona ... dopo averlo inserito ha possibilità di modificarlo ... allora tramite il bottone modifica passo tutte le variabili ricavate dal db nome, via, telefono ecc.. e passo anche la variabile zona ... questa variabile la mostro tramite campo select io nel campo db la variabile c'è solo che non mi mostra la selezione cioè se la zona ad esempio è = "terme" vorrei che mi visualizzasse questo:

<option selected="selected" value="Terme">Terme</option>

solo che non sò per quale motivo non và ...

[varrilaro]

è strano perchè anche io utilizzo un modulo di modifica dati e con lo stesso codice la select funziona....potrebbe essere un errore dei dati che arrivano dal database ????

[slay]

bouhh... forse vengono creati degli spazi .. perchè se faccio <%=rs("zona")%> il nome è giusto ... per questo volevo sapere se esiste l'operatore contiene...

[slay]

ho capito il problema.. solo che non so risolverlo.. allora il problema sta nel fatto che mi vengono aggiunti degli spazi e ovviamente questo fa la differenza:

questo è lo scirpt per recupreo dati:

ByteRicevuti = Request.TotalBytes
if ByteRicevuti > 0 then
    DatiRicevuti = Request.BinaryRead(ByteRicevuti)
    ' funzione che ricostrisce i dati
    For i = 1 To lenB(DatiRicevuti)
        FileBinario = FileBinario & chr(ascB(midB(DatiRicevuti,i,1)))
    Next
    
    Firma = left(FileBinario,instr(FileBinario,"" & vbCrLf)-1)
    ' è una stringa che divide ogni dato inviato attraverso le caselle
    ArrayPezzi = split(FileBinario,Firma)
    ' creo un vettore che contienei pezzi di FileBinario, separando i dati
    ' quindi analizzo un pezzo alla volta
    for item = 1 to ubound(ArrayPezzi)-1
        pos = instr(ArrayPezzi(item),"" & vbCrLf & "" & vbCrLf)
        ' è la posizione del separatore
        intestazione = left(ArrayPezzi(item),pos-1)
        ' separo l'intestazione alla sinistra del separatore
        pos = pos + len("" & vbCrLf) + len("" & vbCrLf)
        ' separo il contenuto alla destra del separatore
            contenuto = mid(ArrayPezzi(item),pos)
dim zero
zero = "0"

    ' Recupero i campi se sono compilati    
        if instr(intestazione,"form_autore") > 0 then
            autore2 = contenuto
        end if

        if instr(intestazione,"form_password") > 0 then
            password2 = contenuto
        end if    

        if instr(intestazione,"form_id") > 0 then
            id = contenuto
        end if    

        if instr(intestazione,"form_nome") > 0 then
            nome = contenuto
        end if            

        if instr(intestazione,"form_descrizione") > 0 then
            descrizione = contenuto
        end if    

        ecc...

        if instr(intestazione,"form_sauna") > 0 then
            sauna = contenuto
            if sauna &"[]" = "[]" then sauna = 0
        end if

    next
end if





set rs = Server.CreateObject("ADODB.COnnection")
sql =     "UPDATE hotel SET "&_
        "nome = '"& nome &"',"&_
        "descrizione = '" & descrizione & "', "&_
        "via = '" & via & "', "&_
        "citta ='" & citta & "', "&_
        "telefono ='" & telefono & "', "&_
        "fax ='" & fax & "', "&_
        "email ='" & email & "', "&_
        "stelle ='" & stelle & "', "&_
        "animali ='" & animali & "', "&_
        "cassaforte= '" & cassaforte & "' ,"&_
        "tv ='" & tv & "' ,"&_
        "piscina ='" & piscina & "', "&_
        "ariacondizionata ='" & ariacondizionata & "', "&_
        "bar ='" & bar & "' ,"&_
        "minibar ='" & minibar & "' ,"&_
        "parcheggio ='" & parcheggio & "', "&_
        "solarium ='" & solarium & "' ,"&_
        "palestra ='" & palestra & "' ,"&_
        "pzminimo ='" & prezzomin & "' ,"&_
        "ombrellone ='" & ombrellone & "' ,"&_
        "sitohotel ='" & sito & "' ,"&_
        "altreinfo ='" & altreinfo & "', "&_
        "zona ='" & zona & "', "&_
        "sauna ='" & sauna & "', "&_
        "camere ='" & camere & "', "&_
        "cap ='" & cap & "', "&_
        "radio ='" & radio & "' ,"&_
        "riscaldamento ='" & riscaldamento & "', "&_
        "ristorante ='" & ristorante & "', "&_
        "handicap ='" & handicap & "', "&_
        "congressi ='" & congressi & "', "&_
        "sertelefono ='" & sertelefono & "', "&_
        "ascensore ='" & ascensore & "', "&_
        "auto ='" & auto & "', "&_
        "babysitter ='" & babysitter & "', "&_
        "visa ='" & visa & "', "&_
        "discover ='" & discover & "', "&_
        "echeck ='" & echeck & "', "&_
        "amex ='" & amex & "', "&_
        "mastercard ='" & mastercard & "', "&_
        "paypal ='" & paypal & "', "&_
        "pzmassimo ='" & pzmassimo & "', "&_
        "staff ='" & staff & "', "&_
        "visualizza ='" & visualizza & "' "&_
        "where "&_
        "id=" & id & ""
        adoCon.Execute(sql)%> 

questa è la stampa della query:

UPDATE hotel SET nome = 'maxhotel3aaack ',descrizione = 'sdescrfzione perchè eccola qui k ', via = 'roma, 54 ', citta ='lobiak ', telefono ='0444555 ', fax ='4545455 ', email ='ddv@fd.it ', stelle ='5 ', animali ='1 ', cassaforte= '1 ' ,tv ='1 ' ,piscina ='1 ', ariacondizionata ='1 ', bar ='1 ' ,minibar ='1 ' ,parcheggio ='1 ', solarium ='1 ' ,palestra ='1 ' ,pzminimo ='23 ' ,ombrellone ='1 ' ,sitohotel ='http://www.ciao.it ' ,altreinfo ='0 ', zona ='Citta ', sauna ='1 ', camere ='23 ', cap ='32015 ', radio ='1 ' ,riscaldamento ='1 ', ristorante ='1 ', handicap ='1 ', congressi ='1 ', sertelefono ='1 ', ascensore ='1 ', auto ='1 ', babysitter ='1 ', visa ='1 ', discover ='1 ', echeck ='1 ', amex ='1 ', mastercard ='1 ', paypal ='1 ', pzmassimo ='0 ', staff ='0 ', visualizza ='1 ' where id=54 

praticamente ci sono degli spazi alla fine di ogni campo come posso rimuoverli? - infatti se entro nella pagina la priva volta la select mi fa la scelta giusta se entro la seconda volta no ... in teoria dovrei eliminarew gli spazi e dopo... avro risolto un bel po' di problemi...