En execute funktion i et database program.

Hvad med ShellExecute API'en ??

Declare Function ShellExecuteA Lib "shell32.dll" ( _
    ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
Dim ls_command, ls_dir, ls_args, ls_exe As String
ls_command = "open"
ls_dir = ""
ls_args = ""
ls_exe = "c:\temp\test.txt" ' udskift med den path du har i basen

ShellExecuteA 0, ls_command, ls_exe, ls_args, ls_dir, 5
End Sub

Så finder brugerens computer selv ud af hvilket program der skal bruges til at åbne filen, vel at mærke hvis der er associeret en app. til de forskellige extensions.

//akj

hmm ville jo gerhe have hvis den hentede afdressen fra databasen i kolonnen >LOC< på den anden måde der kræver at lave laver en knap/funktion for hver document.

og der er ca 300 filer. :-(
men ellers er den du har der perfect hvis det bare er et enkelt program.. :-)

Når du dobbeltklikekr eller hvad du nu gør for at åbne dit dokument så "trækker" du path'en til dokumentet og placerer det i en variabel og kalder denne funktion:

Private Function OpenDoc(ByVal path As String)
Dim ls_command, ls_dir, ls_args As String
ls_command = "open"
ls_dir = ""
ls_args = ""

ShellExecuteA 0, ls_command, path, ls_args, ls_dir, 5
End Function

eks på kald:
OpenDoc MinVariabel ' MinVariabel indeholder stien til dokumentet

//akj

ok forviiret har smidt sourcen op her http://www.eqvaliser.com/temp/eqc.rar
37kb.

der er ikke password på databsen men den er MSacces 97.

+ smider lige nogle flere points på spørgsmålet.

min e-mail er admin@eqvaliser.com

når du åbner er det det projekt det hedder Eqc.

Kan du ikke zippe med winzip ??

hehe joe da.
zipper lige også er jeg offline skal sgu til bornholm og værer hjælper til landstævne.. hehe

sådanne se er den Zipped. nu fylder den 2 kb mere altså 40.. *gg*
http://www.eqvaliser.com/temp/eqc.zip

OKi  jeg tror kun det tager 10 min.

Ellers god tur/fest ;o).

//akj

var det bedre..  (kan winzip ikke tage rar filer. anede det ikke)
nårja jeg bruger kun winrar den tager alle formater. også zip. :-)

*tip www.Winrar.com

kan du så også hjælpe mig med det anedet spørgsmål jeg har
det er de små stander funktion såsom copy, paste

http://www.eksperten.dk/spm/229463

stadivæk samme program..

måske var det ikke så lige til alligevel som jeg havde regnet med..

Jeg sender om 10 sek ;o)

Akj

Så er den sendt, for at overholde expertens regler om at alle skal kunne se løsningen bør du nok uploade løsningen til dit website så andre kan se den.

//akj

ahhhh.. det er så perfect som det kan værer.. :-) thumbs up.

ikke noget problem. jeg er en opensource man, så source code følger altid med ved siden af.. :-)