I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
blasfemo
blasfemo
il 24 novembre 2003 alle 18:47
109 messaggi dal 19 febbraio 2001
ricevo da un database un campo testo.
vorrei confronatre le prime 4 lettere e vedere se sono uguali a "http" oppure no, e dopo con un if reagire in maniera diversa a seconda del risultato dell'if

come posso fare?
RispondiQuoting
Andrea Palmatè
Andrea Palmatè
il 26 novembre 2003 alle 18:11
1.983 messaggi dal 28 febbraio 2001
Contributi
www.amigasoft.net
if lcase(left(adoRst("Campo"),4))="http" then
...
else
...
end if
Modificato da Andrea Palmatè il 26 novembre 2003 18.11 -
--
Andrea Palmatè
RispondiQuoting
blasfemo
blasfemo
il 26 novembre 2003 alle 21:42
109 messaggi dal 19 febbraio 2001
non mi funziona, mi da errore su adoRst ?

ti inserisco uno stralcio di codice, premetto che i dati sono prelevati da un file xml..

visto che ci sei sai anche come caontenare la stringa, quasi a fine codice ?

<%
set BannerName=AllItems(i).selectNodes("NameBanner") 

set Format=AllItems(i).selectNodes("Format")
set Image=AllItems(i).selectNodes("ImageUrl")

if lcase(left(adoRst("" & Image(0).text & ""),4)) = "http" then 

UrlImage = "" & Image(0).text & ""

else 

UrlImage = ""../Banner/" " & Image(0).text & ""  'concatenazione

end if
RispondiQuoting
seoman
seoman
il 26 novembre 2003 alle 21:52
2.584 messaggi dal 14 maggio 2001
adoRst era il nome generico di un recordset (di solito i valori si ottengono da un recordset)... nella tua pagina ti dà errore perché viene cercata una funzione con quel nome non essendoci altro riferimento.

Nel tuo caso la variabile che contiene il valore da controllare è Image se (non sbaglio)....

...
if lcase(left(Image(0).text),4)) = "http" then
....

Per concatenare dovrebbe essere così:
UrlImage = "../Banner/" & Image(0).text & ""
Non ho ben capito perché avevi raddoppiato le doppie virgolette...
RispondiQuoting
blasfemo
blasfemo
il 26 novembre 2003 alle 22:43
109 messaggi dal 19 febbraio 2001
premetto che non ho molta esperienza con xml e asp (è il primo) però continua a dare errore

Numero errato di argomenti o assegnazione di proprietà non valida: 'left'

ti riporto la prima parte del codice...
magari ci capisci meglio

<%
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False

strFile = Server.MapPath(".././Banner/bookmarks.xml") 'perche lo chiamo con server.execute
objXML.Load (strFile)

Set AllItems = objXML.selectNodes("//Advertisements/Ad")

Randomize()
i = Int(Rnd*(AllItems.Length))


set BannerName=AllItems(i).selectNodes("NameBanner")

set Format=AllItems(i).selectNodes("Format")
set Image=AllItems(i).selectNodes("ImageUrl")

if lcase(left(Image(0)),4) = "http" then

UrlImage = "" & Image(0).text & ""

else

UrlImage = "../Banner/" & Image(0).text & ""

end if
Modificato da blasfemo il 26 novembre 2003 22.43 -
RispondiQuoting
seoman
seoman
il 27 novembre 2003 alle 14:13
2.584 messaggi dal 14 maggio 2001
Colpa mia ho sbagliato delle parentesi:

if lcase(left(Image(0).text,4)) = "http" then
RispondiQuoting
blasfemo
blasfemo
il 27 novembre 2003 alle 20:25
109 messaggi dal 19 febbraio 2001
ora va...
grazie della pazienza
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.