Hier biete ich ein TuT an , wie man ein Screen Programm schreibt.bitte Codes genau durchlesen , zum lernen , nich C&P...Fangen wir an , als erstes brauchen wir ein Module , das die ganzen Funktionen deklariert.Modul einfügen mit folgendem Code:Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long) As Long<br />Declare Sub keybd_ev ...
Verfasst am: 02.04.2008, 13:20 Aufrufe: 362
Hallöle ,
ich möchte gerne den PFade auslesen
wohin die datei gespeichert wurden ist mit dem Command Dialog , an besten dazu noch den datei namen , an besten sollte es dann in eine variabel gespeichert werden
Viel Dank
bis dann
DFJ
Verfasst am: 22.08.2007, 15:49 Aufrufe: 3095
Danke schonmal Helo, hab jez alles gemacht mitm Druchsuchen klappt alles, jedo will der Upload einfach nicht-_- hab 2 Textboxen , 2 command buttons , 1 inet trans... , 1 common dialog alles, jedoch will der einfach nicht -_-
Option Explicit
Dim bError As Boolean
Private Sub Command2_Click()
On Error Resume Next
With CommonDialog1
.CancelError = True
.ShowOpen
Text1.Text = CommonDialog1 ...
Verfasst am: 21.08.2007, 21:45 Aufrufe: 3095
auf der form fehlen noch : 2 Textboxen , 2 command buttons , 1 inet trans... , 1 common dialog
Option Explicit
Dim bError As Boolean
Private Sub Command2_Click()
On Error Resume Next
With CommonDialog1
.CancelError = True
.ShowOpen
Text1.Text = CommonDialog1.FileName
End With
End Sub
Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = icError Then
...
[ Time: 5.9542s ][ Queries: 67 (5.8480s) ][ GZIP on - Debug on ]