Autore Messaggio
Infomaint srl 12/12/2011 16:59

Esportazione campo prezzo ivato

Buonasera

come posso modificare il seguente script affinchè invece del prezzo iva esclusa mi esporti il prezzo iva inclusa ?


Dim PrezzoVen
Dim prezzo

  Set PrezzoVen = RowItem.SellingPrice(14, False)
  prezzo =  Replace(PrezzoVen.Price,"'","")

Rdy.ResponseWrite(prezzo)
Fabio 12/12/2011 23:19

Occorre cambiare False in True sulla terza riga

Option Explicit
Dim PrezzoVen
Dim prezzo

Set PrezzoVen = RowItem.SellingPrice(14, True)
prezzo =  Replace(PrezzoVen.Price,"'","")

Rdy.ResponseWrite(prezzo)


Oppure piu' sinteticamente

Response.Write(Product.SellingPrice(14, True).Price)