Upload - era: Ciao Pole

grisu81 ha scritto:

...devo mettere dei menù a tendina dove compaiono dei valori prestabiliti da scegliere...

Clicca per allargare...

Eccomi qua!! :fonzie:

Bene Massimo, cominciamo!

Allora, supponiamo che vuoi mettere un menù a tendina per la voce FIGURA PROFESSIONALE RICHIESTA, con le voci "Direttore Aziendale", "Responsabile Acquisti" e "Responsabile Vendite".

======================================

In azienda form dati2.html dove dapprima avevamo la input text

<input type=text name=figprof><H5>FIGURA PROFESSIONALE RICHIESTA</H5>

ora metterai

<H5>FIGURA PROFESSIONALE RICHIESTA
<select name=figprof>
<option value="dir">Direttore Aziendale
<option value="resp_acq">Responsabile Acquisti
<option value="resp_vend">Responsabile Vendite
</select></H5>

======================================

In progetto originale upload.asp invece di fare

fipr=request.form("figprof")

per dare il valore alla variabile fipr, dovrai fare:

fipr=request("figprof")

il valore che essa prenderà sarà il value della option selezionata precedentemente nella select (quindi "dir" oppure "resp_acq" oppure "resp_vend").
======================================

Et voilà, il gioco è fatto!!
:byebye:

Ciao Massimo!! :fonzie:

Col PC va tutto bene grazie, e grazie anche per l'interessamento!
Avevo AnitiVir fin qualche tempo fa, ed è quello con cui mi son trovato meglio rispetto a quelli che ho provato, perchè lascia il pc fluido e non lo rallenta per niente!!! Sapessi quanto mi manca...

Vabbè torniamo a noi!

Oggi mi spiace ma ho un transatlantico di cose da fare, però intanto ti spiego la logica, così stavolta provi a fare tutto da solo, e fidati, è il miglior modo per imparare!!

==================================
Innanzitutto azzera tutti i campi del DB e aggiungi in testa alla tabella datiutente un nuovo campo che chiamerai "id", tipo CONTATORE, settato come Chiave Primaria.
Questo non ti comporterà nessuna modifica alla pagina di upload.asp.
Ora salva dei nuovi utenti

==================================
Ora devi creare una ASP (elenco_utenti.asp) che lancia una query "SELECT * from datiutente" e che stampa poi il contenuto del recordset a video.
Ogni record trovato devi far si che appaia come link, in questo modo:

<%
'connessione al DB
'apertura oggetto recordset

do while not oggrecset.EOF
%>
<a href="dettaglio.asp?Chiave=<%=oggrecset("id")%>"><%=oggrecset("nome_azienda")%></a>
<br><br>
<%
oggrecset.MoveNext
loop
%>

ossia nelle parentesi di oggrecset devi mettere
oggrecset("nome_campo_del_DB")

==================================
Una volta finita la pagina elenco_utenti.ASP crea un'altra ASP, di nome dettagli_utente.ASP
Creaci una variabile che chiameremo per esempio key, e "infilaci" dentro il valore del "id" dell'utente su cui hai cliccato il nome facendo

<%
dim key
key=request.QueryString("Chiave")
%>

Ora crea una query che estrapoli dal DB il record avente l' "id" corrispondente (SELECT * FROM datiutente WHERE id="& key &"; --> metti solo gli apici doppi questa volta perchè key è un valore numerico, come "id") e crea un form con degli input text che conterranno i valori del record trovato. Per farlo copia pure il form di azienda form dati2.html in questa nuova dettagli_utente.asp, solo che nella action del tag form metti "modifica.asp", che sarà la ASP che andra a modificare i dati dell'utente in base a quelli inseriti in questo nuovo modulo contenuto in dettagli_utente.asp.

Per far si che negli input text del nuovo form appaiano i valori del record set dovrai modificarli aggiungendo la parte in rosso

<input type=text name=nomeazienda value="<%=oggrecset("nome_azienda")%>"><H5>NOME AZIENDA</H5>

e così via..

==================================
A questo punto la asp modifica.asp che verrà chiamata dovrà contenere una query con un UPDATE, epoi, come nella tua prima asp di upload, fai un redirect a una pagina.htm.

==================================


Scusa se son stato veloce ma proprio non ho tempo!
Spero (e credo! ) comunque di esser stato piuttosto chiaro!

A più tardi (forse) !
Salut!
:byebye:

NB=questo è un modo piuttosto lungo da fare, lo so, ma con le conoscenze che hai è il migliore secondo me per farti imparare! Poi però tieni conto che non son un insegnante eh!

Benone!!

grisu81 ha scritto:

...Apparte alcune cose che non conoscevo la logica è chiarissima...

Clicca per allargare...

Son felice che hai capito, e son contento anche che ci siano in mezzo cose che prima non conoscevi, così impari di più!

Per qualsiasi dubbio ti sorga non esitare a scrivere al forum!

Salut!
:fonzie:

Son qui!!!

Ciao Massi!!! :fonzie:

Guarda, è semplicissimo!

1-Entra nel DB e seleziona la tabella di cui vuoi azzerare il contatore, fai ctrl+C e poi ctrl+V.
2-A questo punto ti apparirà una finestra: seleziona Solo struttura e salva la nuova tabella con un nome provvisorio.
3-A questo punto elimina quella vecchia e rinomina quella nuova col nome giusto!

Ed ecco risolto il problema!
Ci sentiamo presto!

Salut!
:byebye:

Adoro le ferie!!!!!!!!!!

Ciao Massi!!! :fonzie:
Devi scusarmi, mi ero dimenticato di dirti che da ieri, e per 3 SETTIMANE, sono in ferie!!!!

Mi spiace anbandonarti per questo periodo, ma è da CAPODANNO che non vado in ferie, per cui il pc questa è l'ultima volta che lo accendo per i prossimi 20 giorni!! Comunque torno il 22, se avrai bisogno sarò qui!!!

Ora me ne vò in spiaggia!!!

A presto, e buone vacanze anche a te!!!

Salut!
:byebye:

Ciao Massimo!!!

E' un bel po' si che non ci si sente!!

Le vacanze sono andate mooolto bene..

Ma torniamo a noi!!!
Dunque, ho visto che il select case è giusto, e anche gli if della prima ASP lo sono!

Per quanto riguarda i cicli te li ho messi a posto.
Il fatto che nel caso del do while e del For non funzionava nulla e ti dava quell'errore è dovuto al fatto che tu facevi:

Do While x <> valdoloopday

e nel ciclo for
...
for i= 1 to 7

if valueday=i then
...

Così è sbagliato perchè le variabili valdoloopday e valueday prendono il valore dell'input text, che però, nonostante sia un numero, viene letto sempre dalla ASP come fosse una stringa.
Perciò l'elaboratore inizia il ciclo rapportando x (o i nel for), che è un intero, ad una stringa, risultato: la condizione del ciclo non si verifica MAI e il ciclo continua all'infinito, ossia il programma va in LOOP, dandoti quell'errore che mi dicevi!
Per far si che diventi un numero devi fare:
Cint(nome_variabile).

Ti ho messo a posto anche le ASP, così funzionano:

=======================================
form_arrayweek_do_loop.html
<%@Language=VBScript%>
<%
dim arrdoloopday(7)
dim valdoloopday
dim x

valdoloopday=request.form("frmdoloopset")


arrdoloopday(0) = "Lunedi"

arrdoloopday(1) = "Martedi"

arrdoloopday(2) = "Mercoledi"

arrdoloopday(3) = "Giovedi"

arrdoloopday(4) = "Venerdi"

arrdoloopday(5) = "Sabato"

arrdoloopday(6) = "Domenica"



x=0
do while x<Cint(valdoloopday)
x=x+1
loop

response.write (arrdoloopday(x-1))


%>
=====================================


=====================================
form_arrayweek_ciclofor.html
<%@Language=VBScript%>
<%
dim arrayday(7)
dim valueday

valueday=request.form("frmgior")


arrayday(0) = "Lunedi"

arrayday(1) = "Martedi"

arrayday(2) = "Mercoledi"

arrayday(3) = "Giovedi"

arrayday(4) = "Venerdi"

arrayday(5) = "Sabato"

arrayday(6) = "Domenica"


for i=0 to 6
if i=Cint(valueday) then
response.write arrayday(i-1)
end if
next
%>
=================================

Come vedi ci sono delle modifiche rispetto alle tue, ma questa volta prova a capirle da solo, di modo da allenarti!

Se casomai non capisci qualcosa, sono qui come al solito (quando posso )!!

Salut!!
:byebye:

P.S.=ti consiglio di far si che le ASP controllino che nell'input text venga inserito sempre e solo un numero, e che non sia mai maggiore di 7!

Ora sono a posto!

Ciao Massi! :fonzie:

Sai, se fossi in te cambierei sito da cui scaricare esempi.. di 4 asp che ti hanno dato in quella lezione ho dovuto correggerne 3!!
La quarta non era da metter a posto perchè contiene solo un semplice response.write...

Comunque, eccoti i codici corretti (le parti in blu sono le correzioni):

apreFile.asp

<%
Dim objOpenFile, objFSO, strPath
strPath = Server.MapPath("public/fileProva.txt")
Set ObjFSO = Server.CreateObject("Scripting.FileSystemObject")
Set ObjOpenFile = ObjFSO.OpenTextFile(strPath, 1)
Do while not ObjOpenFile.AtEndofStream
Response.Write ObjOpenFile.Readline & "<br>" 'ho aggiunto & <br> di modo che vada a capo per ogni linea del file di testo, altrimenti scriveva tutto di fila. Attento anche che in qualche riga c'erano degli spazi finali che mandano la ASP in errore!
Loop
objOpenFile.Close
Set objOpenFile = Nothing
Set objFSO = Nothing
%>

========================================

scriveFile.asp

Sostituisci la riga
strPath = Server.MapPath("../public/testo.txt")
con
strPath = Server.MapPath("public/fileProva.txt")

========================================

sonoIn1.asp

<%
Response.Write ("Sono nella pagina 1 <br>")
Server.Execute("sonoin2.asp")
Response.Write ("Sono di nuovo nella pagina 1")
%>

========================================

Mi raccomando creare la cartella 'public' allo stesso livello delle ASP, e al suo interno creare il file 'fileProva.txt' scrivendoci qualche riga di testo!

A presto e buono studio, ciao Massimo!
Salut!!
:byebye: