XProfan

- page 1 -

Jörg
Sellmeyer

allô Andreas,
peut-être reicht aussi déjà un FileMode 0 pour Readonly avant dem Assign.
Salut
Jörg

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

01.12.2004 ▲

Andreas
Spelter

merci pour qui Tips, alles probiert, rien hilft:

Solange mon Programme aktiv ist peux je qui carte pas désactiver, selbst ensuite pas si je qui Dossier de qui carte avec shell cmd... sur qui Festplatte kopiert et de là gelesen habe.

encore plus idées?

Andreas

PS: Hab justement encore un Notebook avec Windows 98 trouvé, cela stellt sich avec meinem Programme pas so pingelig à: carte raus, carte rein, einlesen allez.

01.12.2004 ▲

je hab Dir ici la fois ne dll gebastelt - versuchs la fois avec cela.

important dabei ist cela qui DLL pas per usedll geladen wird - mais seulement per extern.
qui DLL hat aussi seulement une Funktion CP Filename1 Filename2 CopyFileMode.

avec dem einstellbaren CopyFileMode peux Du oui la fois rummspielen.

Es peux mais son cela qui DLL avec komischen Pfaden pas klarkommt.
Teste es s'il te plaît seulement comment je sur LW C. alors chez mir klappte es wunderbar.

So gehts:
Kompilieren Marque Séparation

cls
print external ("cp.dll","cp","c:S2.BMP","C:s4.bmp",0)+" Bytes"
waitkey
end
Open Access
open_access_ReadOnly          = $0000; { ---- ---- ---- -000 }
open_access_WriteOnly         = $0001; { ---- ---- ---- -001 }
open_access_ReadWrite         = $0002; { ---- ---- ---- -010 }
Open share rights
open_share_DenyReadWrite      = $0010; { ---- ---- -001 ---- }
open_share_DenyWrite          = $0020; { ---- ---- -010 ---- }
open_share_DenyRead           = $0030; { ---- ---- -011 ---- }
open_share_DenyNone           = $0040; { ---- ---- -100 ---- /font>

Salve, iF

cp.dll	7 kB

Hochgeladen:	02.12.2004

Downloadcounter:
		Download

Andreas
Spelter

merci pour qui Mühe, mais cet DLL funktioniert chez Je ne.

- sous Windows 98 hängt sich cela Programme simple weg
- sous Windows 2000 gibt es toujours deux Fehlermeldungen et ist ensuite weg
- sous Windows XP erzeugt es entweder une Dossier avec wirrem Dateinamen et falschem le contenu ou bien ist pour deux Fehlermeldungen weg

je hatte pour cet Versuche aussi wirklich seulement cet Programme traduit:

cls
imprimer external (cp.dll,cp,c:est1.txt,c:est2.txt,0)+ Bytes
waitkey
end

Andreas

Windows 2000 1.jpg Preview

11 kB

Hochgeladen:

02.12.2004

Windows 2000 2.jpg Preview

11 kB

Hochgeladen:

02.12.2004

Windows XP 1.jpg Preview

13 kB

Hochgeladen:

02.12.2004

Windows XP 2.jpg Preview

13 kB

Hochgeladen:

02.12.2004

Welches Profan la hâte?

si <xprofan, ensuite fais statt

imprimer external (cp.dll,cp,c:est1.txt,c:est2.txt,0)+ Bytes

simple

f1$=c:est1.txt
f2$=c:est2.txt
imprimer external (cp.dll,cp,addr(f1$),addr(f2$),0)+ Bytes

Salve, iF

Andreas
Spelter

je travaille ici avec Profan 7.0 sous Windows XP.

avec dem le détour sur qui Variablen hat es einmal presque funktioniert: Es wurde qui richtige Dossier kopiert, cela but hatte aussi den richtigen Namen am Ende qui Dossier wurden cependant quelques Zeilen gelöscht et irgendwelcher Unsinn angehängt.

chez allen weiteren Versuchen passierte cependant rien plus, aussi pas pour einem Neustart de Windows, cela Programme hängt sich maintenant toujours pour test weg.

Andreas

cls
declare f1$
declare f2$
imprimer test
f1$=c:est1.txt
f2$=c:est2.txt
imprimer external(cp.dll,cp,addr(f1$),addr(f2$),0)+ Bytes
waitkey
end

Jörg
Sellmeyer

Salut,
tu dois sur jeden le cas entweder Großbuchstaben pour qui Literale benutzen ou bien den Backslash doppelt écrivons.
Ansonsten interpretiert Profan cela comme tabulateur.
Donc:
C:TEST.TXT
c:\test.txt
si es réellement déjà chez imprimer test hängt, fällt mir allerdings aussi nix en supplément un.
Salut
Jörg

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

Relatif à la Imprimer <- était wirklichn blödes Beispiel.

Wäre oui pas qui 1. Discours avec Escsequenzen.

Machs doch anders - si le Anwendung finissez son doit - ensuite finis vous doch. faisons un Trick. Laß deine Exe cela File simple sur ne 2. Instanz kopieren. Solle doch deine exe sich selbst appel avec nem paramètre.

shell par$(0)+ -copyit

Votre exe stellt am anfang des Programmes fest cela es avec nem paramètre gestartet wurde:

si bordure$(par$(1))=-copyit

copy bla bla
FIN

endif

et kopiert cela File. qui exe qui es kopierte is doch ensuite finissez.

quoi là eh bien qui Unterschied son soll entre dem Aufruf einer CMD ou bien einer Eigenen exe sais je aussi pas - mais un Versuch isses wert.

Salve, iF

Andreas
Spelter

und dir voran: cela Kopieren funktioniert maintenant, mais qui Dossier wird beim kopieren modifié:

Andreas

cls
declare f1$
declare f2$
imprimer test
f1$=d:\test1.txt
f2$=d:\test2.txt
imprimer external(cp.dll,cp,addr(f1$),addr(f2$),0)+ Bytes
waitkey
end

test1.txt

1 kB

Hochgeladen:

03.12.2004

test2.txt

4 kB

Hochgeladen:

03.12.2004

- page 2 -

Andreas
Spelter

eh weh, suis je blöd!

Es était gar pas ASSIGN et CLOSE cela qui carte festhält, mais cela FINFFIRST avec dem je auparavant überprüfe si qui Dossier überhaupt vorhanden ist.

je hoffe vous pouvez mir encore einmal verzeihen.

Andreas

joli cela es maintenant funzt.

Dennis
Schulmeister

je fürchte, dass wir pas entier sans Konsequenzen wegkommen, Andreas. Seien wir la fois pas so. trois la fois cela Roland-Unser et deux la fois nächtlich qui Profan²-Kranz devrait suffire.

(Fast) alle Profan²-Versionen seit Version 2.6, sowie (fast) alle Windows-Versionen seit Windows 3.1