Hej
Ville med ett vb-program flytta en bildfil. (.jpg-format)
La först in den i en bildruta:
Form5.Picture1.Picture = LoadPicture(Filinfo)
Filinfo = sökvägen
Bilden kom in i rutan.

Ville sedan spara den på en ny plats. Gav en ny sökväg och efter fritt val av nytt namn (i inputbox) la jag till ändelsen ".jpg".
Skrev sedan:
SavePicture Form5.Picture1.Picture, Bildnamn
Bildbanmn = sökvägen
Bilden flyttades. Men:

När jag öppnar i Paint och säger att det är en .jpg-fil så öppnas den, MEN:
När jag öppnar i en del andra program får jag felmeddelande:
Fel, ev. fel format eller så är filen redan öppen, eller så saknas ...

Notera att alla program öppnar filen på originalplats.

Vad kan man göra?
Tacksam för förslag. MvH Per

SavePicture sparar bilden som Bitmap. Oavsett filändelse.

Använd Istället Name för att flytta en fil:

<code>
Dim Filinfo As String
Dim Bildnamn As String
Filinfo = "c:\Min bild.jpg"
Bildnamn = "c:\Test\Min bild.jpg"

Name Filinfo As Bildnamn
</code>

Tack.
Jo, jag skrev så: "Flytta Bildfil", och det var exakt vad som hände. Den flyttades från plats 1 till plats 2. Men om jag nu vill ha kvar originalet också?
Undrar Per

Hej
Jo det går att krångla till det mesta , Andreas är duktig på det.
Gör så här:
FileCopy "c:\Min bild.jpg", "c:\Test\Min bild.jpg"

"c:\Test måste finnas.Om inte får man lägga till kod
som tillverkar mapp Test
Om du sedan vill få det som flytta, vilket du tydligen inte ville
så kan du skriva: Kill "c:\Min bild.jpg"

/Sven

Du kan ju inte skriva flytta om du vill kopiera filen. Svarade på det du frågade. ;o)