Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 14
  1. #1
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464

    pdf generator e data dinamica

    Salve, in una pagina che mi genera il pdf della fattura vorrei poter inserire una data dinamica cioè la data che sarà aggiungendo 6 mesi alla data di oggi.


    Questo il codice, la modifica che vorrei fare è ad esempio OGGI+6MESI


    pdf.sety 280
    pdf.setx 25
    pdf.SetFont"Arial","B",12
    pdf.MultiCell 70,6,"31 Dicembre 2012",0,"J"

    grazie in anticipo
    A

  2. #2
    Amministratore L'avatar di Vincent.Zeno
    Registrato dal
    May 2003
    residenza
    Emilia-Romagna (tortellini und cappelletti land!)
    Messaggi
    20,812
    http://www.w3schools.com/vbscript/func_dateadd.asp

    gli esempi sono eseguiti/mostrati in locale ma puoi eseguirli in asp/vb sul server


  3. #3
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464
    Grazie mille, molto interessante ma avrei ancora da chiedere:

    così è quanto serve a me:

    document.write(DateAdd("m",+6,Now))

    e questo è il risultato:

    Tue May 14 16:29:18 UTC+0200 2013

    Volendo avere una smep'lice data in italiano e senza tutti quei riferimenit all'orario ecc ecc come posso fare?
    Vorrei che il risultato sia questo:

    14 Maggio 2013 (oppure andrebbe bene anche in inglese ma senza l'ora ed il giorno)

    Grazie ancora

  4. #4
    Amministratore L'avatar di Vincent.Zeno
    Registrato dal
    May 2003
    residenza
    Emilia-Romagna (tortellini und cappelletti land!)
    Messaggi
    20,812
    codice:
    DateAdd("m",6,Date())
    e poi se serve:
    http://www.w3schools.com/vbscript/fu...atdatetime.asp

  5. #5
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464
    Perfetto, ho trovato la combinazione giusta ora però ci sarebbe da combinare questo:


    pdf.sety 280
    pdf.setx 25
    pdf.SetFont"Arial","B",12
    pdf.MultiCell 70,6,"31 Dicembre 2012",0,"J"


    con questo al posto della data fissa, come si fa?


    d=CDate(DateAdd("m",+6,Now))
    document.write(FormatDateTime(d,1))

  6. #6
    Amministratore L'avatar di Vincent.Zeno
    Registrato dal
    May 2003
    residenza
    Emilia-Romagna (tortellini und cappelletti land!)
    Messaggi
    20,812
    al posto di "31 Dicembre 2012" ci metti la variabile d
    codice:
    d= FormatDateTime(CDate(DateAdd("m",6,date())),1)
    anche se non l'ho provato nello script per il pdf la variabile "d" dovrebbe prenderla
    codice:
    pdf.MultiCell 70,6,"31 Dicembre 2012",0,"J" 
    diventa
    pdf.MultiCell 70,6,d,0,"J"

  7. #7
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464
    ho messo così, si apre la pagina in pdf ma al posto della esce UNDEFINED

    pdf.sety 280
    pdf.setx 25
    pdf.SetFont"Arial","B",12
    pdf.MultiCell 70,6,d,0,"J"


    d= FormatDateTime(CDate(DateAdd("m",6,date())),1)


    GREAZIE ANCORA

  8. #8
    Amministratore L'avatar di Vincent.Zeno
    Registrato dal
    May 2003
    residenza
    Emilia-Romagna (tortellini und cappelletti land!)
    Messaggi
    20,812
    sarà il caso di definire la variabile PRIMA di stamparla, che ne dici?

    edit:
    per favore usa il tag [CODE][/CODE] per postare codice, grazie

  9. #9
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464
    sei grande, tutto funziona
    grazie ;-)

  10. #10
    Utente di HTML.it
    Registrato dal
    Aug 2007
    Messaggi
    464
    altra esigenza continuando sulla stessa modfica e cioè:

    oltre che stampare sul pdf la scadenza dovrei inserire anche nel db la data di scadenza relativa a "quel" codice. Ci sono riuscito e funziona se metto una data fissa ma se voglio fare lo stesso ragionamento come posso risolvere?


    cioè così mi funziona bene ma ovviamente inserisce la data "non dinamica"
    codice:
    SQL5 = " UPDATE promo SET scadenza = '31/12/2012' WHERE valore = '" & Valore & "' "
    Set RS5 = Conn.Execute (SQL5)
    quello che mi servirebbe è questo:

    codice:
    d= FormatDateTime(CDate(DateAdd("m",4,date())),2)
    
    SQL5 = " UPDATE promo SET scadenza = 'd' WHERE valore = '" & Valore & "' "
    Set RS5 = Conn.Execute (SQL5)
    grazie ancora in anticipo

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.