Questo sito usa i cookie per fornirti un'esperienza migliore. Cliccando su "Accetta" saranno attivate tutte le categorie di cookie. Per decidere quali accettare, cliccare invece su "Personalizza". Per maggiori informazioni è possibile consultare la pagina Cookie policy.

PersonalizzaAccetta
CHIUDI
Autore Messaggio
USER0 25/05/2017 15:35 USER0

Esportare Url Immagine1 e copiare quel file in un'altra cartella

Salve,
riesco ad esportare l'url della foto principale... ma mi ritrovo 2 problemi

1- nell'url la foto ha un nome di questo tipo 140_553_553_32464110152.JPG
invece nelle cartelle di ready i file hanno nomi tipo 1234_123456.jpg


2 - avendo usato ready prima con un archivio, e negli ultimi mesi con un altro.... non capisco se delle foto sono rimaste nella cartella dell archivio 1 , e se i link vengono creati correttamente......  volendo creare una cartella a parte dove durante lo script la foto in questione viene appunto copiata
( ho usato comandi simili )

Set myFile=Rdy.File(Product.CustomField(870))
   myFile.CopyFileTo("D:\\FotoReady\\" & Fotografia.Link)
USER0 25/05/2017 16:23 Campo libero: USER0

Citazione:
1- nell'url la foto ha un nome di questo tipo 140_553_553_32464110152.JPG

Esattamente in che modo fate questa esportazione?


Citazione:
2 - avendo usato ready prima con un archivio, e negli ultimi mesi con un altro....

Questo e' un problema, se avete lavorato all'interno della stessa cartella, perche' adesso le cartelle con le foto possono contenere file che erano relative ad un archivio e non all'altro. Per questo e' impossibile poter rispondere alla domanda senza vedere direttamente gli archivi e le cartelle (cosa che potete eventualmente fare in teleassistenza con uno dei nostri tecnici)
USER0 25/05/2017 21:54 USER0

Con lo script di seguito..... preso da un vostro esempio nella guida...



Option Explicit

Dim IdTipoFoto
Dim UrlSito
Dim Fotografia
Dim PathImmagine
Dim myFile
Dim UrlFoto
Dim UrlFotoD

IdTipoFoto = 1
UrlSito = "http://www.infoplanet-store.it"
UrlFoto = "C:\Ready\ReadyPro\Archivi\Archivio\archivio_Files\Foto"
UrlFotoD = "D:\FotoReady"

PathImmagine=""
For Each Fotografia In Product.Photos
   If Fotografia.IdType = IdTipoFoto Then
       PathImmagine = Fotografia.Link
              Exit For
   End If
Next

If PathImmagine<>"" Then
   Response.Write(UrlSito & Replace(PathImmagine,"","/"))
   Set myFile=Rdy.File(Product.CustomField(870))
   myFile.CopyFileTo("D:\FotoReady" & Fotografia.Link)
   Else
   Response.Write("")
End If
USER0 25/05/2017 21:58 USER0

i link sembra che li crei correttamente..... ma pare che non copia il file nella cartella D:Fotoready
USER0 26/05/2017 11:44 Campo libero: USER0

Citazione:
Con lo script di seguito..... preso da un vostro esempio nella guida...

Mi dispiace ma non posso aiutarla nello specifico per lo sviluppo di script.
Per un supporto nell'utilizzo e/o personalizzazione di script deve necessariamente rivolgersi al nostro servizio di teleassistenza