selnmich

Hi, NoNo its all right with Filcopy in Autoit... But when i copy one bigfile(1000 MB) i would like see a progressbar and the Windows API do this (so i hope). Can you help me?? Sorry for my bad english cya Selnmich

Hi, I want to use API Filcopy... Here a vb sample script from micro$oft Declare Function apiCopyFile Lib "kernel32" Alias "CopyFileA" _ (ByVal lpExistingFileName As String, _ ByVal lpNewFileName As String, _ ByVal bFailIfExists As Long) As Long Sub CopyFile(SourceFile As String, DestFile As String) '--------------------------------------------------------------- ' PURPOSE: Copy a file on disk from one location to another. ' ACCEPTS: The name of the source file and destination file. ' RETURNS: Nothing '--------------------------------------------------------------- Dim Result As Long If Dir(SourceFile) = "" Then MsgBox Chr(34) & SourceFile & Chr(34) & _ " is not valid file name." Else Result = apiCopyFile(SourceFile, DestFile, False) End If End Sub please help me.... thanks

HI, I can set outputs, Inputs and works good. Only one problem i had. I must set an output while left mouse button down on "Button Control" and cleared wenn mouse button up. So if you have an idea please tell me. selnmich

wow cool, it's work s for me, many many thanks !!! cya SelnMich

Hi folks! I'm new in the Autoit Scene and hope u can help me. First i must say autoit is sooo cool, i love it. But i have a problem with dllcall. I like to use a dll named "k8055.dll" with autoit. This control a usb board with outputs and inputs. Here a link: http://linuxk8055.free.fr/ i have a sample in vb.net like this: Public Class Form1 Inherits System.Windows.Forms.Form Private Declare Function OpenDevice Lib "k8055d.dll" (ByVal CardAddress As Integer) As Integer Private Declare Sub CloseDevice Lib "k8055d.dll" () Private Declare Function ReadAnalogChannel Lib "k8055d.dll" (ByVal Channel As Integer) As Integer Private Declare Sub ReadAllAnalog Lib "k8055d.dll" (ByRef Data1 As Integer, ByRef Data2 As Integer) Private Declare Sub OutputAnalogChannel Lib "k8055d.dll" (ByVal Channel As Integer, ByVal Data As Integer) Private Declare Sub OutputAllAnalog Lib "k8055d.dll" (ByVal Data1 As Integer, ByVal Data2 As Integer) Private Declare Sub ClearAnalogChannel Lib "k8055d.dll" (ByVal Channel As Integer) Private Declare Sub SetAllAnalog Lib "k8055d.dll" () Private Declare Sub ClearAllAnalog Lib "k8055d.dll" () Private Declare Sub SetAnalogChannel Lib "k8055d.dll" (ByVal Channel As Integer) Private Declare Sub WriteAllDigital Lib "k8055d.dll" (ByVal Data As Integer) Private Declare Sub ClearDigitalChannel Lib "k8055d.dll" (ByVal Channel As Integer) Private Declare Sub ClearAllDigital Lib "k8055d.dll" () Private Declare Sub SetDigitalChannel Lib "k8055d.dll" (ByVal Channel As Integer) Private Declare Sub SetAllDigital Lib "k8055d.dll" () Private Declare Function ReadDigitalChannel Lib "k8055d.dll" (ByVal Channel As Integer) As Boolean Private Declare Function ReadAllDigital Lib "k8055d.dll" () As Integer Private Declare Function ReadCounter Lib "k8055d.dll" (ByVal CounterNr As Integer) As Integer Private Declare Sub ResetCounter Lib "k8055d.dll" (ByVal CounterNr As Integer) Private Declare Sub SetCounterDebounceTime Lib "k8055d.dll" (ByVal CounterNr As Integer, ByVal DebounceTime As Integer) Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim h As Integer Dim CardAddress As Integer ReadConfig() CardAddress = 0 h = OpenDevice(CardAddress) 'open vallemann usb interface WriteAllDigital(1) 'set all output digis on usb board Me.WindowState = FormWindowState.Maximized End Sub can u help me ?? thanks Selnmich