%Systemroot% ???

Hej Simon.

Man kan bruge App.Path som fortæller dit VB prog hvor det ligger i systemet, så lad os sige at du vil have dit prog til at åbne en text fil lige når det åbnes kunne det gøre sådan her.

Private Sub Form_Load()

Dim tekstvariabel_onload As String
Dim path As String

    Text1.Text = ""

    path = App.path

    Open App.path + "\dinfil.text" For Input As #1
    Do Until EOF(1)
    Line Input #1, tekstvariabel_onload
    Text1.Text = tekstvariabel_onload & Chr$(13) & Chr$(10)
    Loop
    Close #1
end sub

Håber dette kan hjælpe.

Mvh.

Christian H

jeg kan ikke bruge den commando (app.path) da mit program ikke ligger inde på computeren endnu, mit installations program skal henvise til hvor programmet kan ligge henne, så mangler viden om hvordan jeg benytter komandoen %Programpath% så jeg kan ligge mit program i "program files".

Det skal du angive i package and development delen når du frigiver dit program, normalt vil det være sådan at hvis det er et dansk styresystem du inst. under vil det være "Programmer" og hvis det er engelsk vil det være "Program Files"

Det du så skal gøre er, at du opretter et enviroment på din PC´er. Dette gøres under kontrol panelet og under system.

/webcon

hej simon, funktionen du omtaler kan højest sandsynligt opnåes ved brug af FileSystemObject. Du kan få FSO til at finde f.eks. windows el. programmer-stien og derefter i din kode bruge f.eks. Replace(Sti,"%systemroot%",FundneSti).
Et eksempel på FSO er som følge:

    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    Print = "Din windowsmappe er: " & fso.getspecialfolder(0)
    Print = "Din systemmappe er: " & fso.getspecialfolder(1)
    Print = "Din tempmappe er: " & fso.getspecialfolder(2)

Mere funktionalitet kan findes til FSO ved at søge på diverse VB-websider, f.eks. planet-source-code...
-Sion

Svar :-)

Tak sion det var lige hvad er ledte efter Takker :)