Changeset 451 for branches


Ignore:
Timestamp:
May 25, 2010, 6:17:14 PM (16 years ago)
Author:
Herwig Bauernfeind
Message:

GUI-Tools: SSCC 1.0.0, SMBUsers 0.9.8 several fixes, rest

Location:
branches/guitools-1.0
Files:
19 edited

Legend:

Unmodified
Added
Removed

  • branches/guitools-1.0/install/changes

    r409 r451  
     1
     2
     3
     4
     5
     6
     7
     8
     9
     10
     11
     12
     13
     14
     15
     16
     17
     18
     19
     20
     21
     22
     23
    124Version 0.9.4 19-02-2010
    225                         +Added: User is forced to create a "root" account now,

  • branches/guitools-1.0/install/sscc.vrp

    r408 r451  
    33MacroPath: VRM:U:\Develop\Samba\guitools-1.0\install
    44EXEPath:
    5 RunParameters:
     5RunParameters:
    66RunDirectory: E:\Dev\REXX\VXREXX\Projects\Samba\install
    77VRXWindow: __VREMainWindow,1,2180,4481,891,7263
    8 VRXWindow: __VRESectionListWindow,1,3011,12286,8974,3144
    9 VRXWindow: __VREToolsWindow,1,3211,10648,6995,1663
     8VRXWindow: __VRESectionListWindow,1,3011,1
     9VRXWindow: __VREToolsWindow,1,
    1010VRXWindow: __VREWindListWindow,1,385,12286,2650,3150
    1111UserFile: 1
    … …  
    1313UserWindow: GB_Global_1,1
    1414UserWindow: Installer,1
     15

  • branches/guitools-1.0/install/sscc.vrx

    r408 r451  
    9393#append U:\Develop\Samba\guitools-1.0\shared\inittempdir.vrs
    9494#append U:\Develop\Samba\guitools-1.0\shared\sambainit.vrs
    95 #append U:\Develop\Samba\guitools-1.0\shared\nlv.vrs
     95#append U:\Develop\Samba\guitools-.0\shared\nlv.vrs
    9696#append U:\Develop\Samba\guitools-1.0\shared\swat.vrs
    9797*/
    … …  
    400400
    401401    advanced.!bigicons = VRGetIni( "Options", "BigIcons", OurINI)
    402     if advanced.!bigicons = "" then advanced.!bigicons = 0
     402    if advanced.!bigicons = "" then advanced.!bigicons =
    403403
    404404    /* Initialize several variables */
    … …  
    418418    CreatePDC = 0   /* only for installermode */
    419419
    420 
    421 
    422420    FWidth = 32
    423421
    424     IF advanced.!bigicons == 1 THEN say '_INIRead() done'
     422    IF == 1 THEN say '_INIRead() done'
    425423return
    426424
    … …  
    477475*/
    478476_LoadOtherFuncs:
    479     ok = VRRedirectStdio('OFF')
     477    if options.!Debug then ok = VRREdirectStdIO("ON")
     478                      else ok = VRREdirectStdIO("OFF")
    480479
    481480    call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
    … …  
    673672        call _SmbConfBackup
    674673        if InstallMode then do
    675             Msg.Text = NLVGetMessage(56, samba.!smbconf)
     674            window = VRLoadSecondary( "RemoveConfig", "W" )
     675        end
     676    end
     677
     678    if \VRFileExists(swatusers) & swatauth = 1 & InstallMode = 0 then do
     679        Msg.Text = NLVGetMessage(115, swatusers)
     680        Msg.Type = "W"
     681        call _ShowMsg
     682    end
     683    IF options.!debug == 1 THEN say '  Does "'samba.!smbconf'" still exist? 'SmbConfExists' (1=Yes, 0=No)'
     684    IF options.!debug == 1 THEN say '  Running in InstallMode = 'InstallMode' (1=Yes, 0=No)'
     685
     686    IF options.!debug == 1 THEN say '_SambaCheckComponents() done'
     687return
     688
     689
     690/*          Msg.Text = NLVGetMessage(56, samba.!smbconf)
    676691            Msg.Type = "Q"
    677692            ok = _MsgYesNo()
    … …  
    679694                ok = SysFileDelete(samba.!smbconf)
    680695                SmbConfExists = 0
     696
     697
     698
     699
     700
     701
     702
     703
     704
     705
     706
     707
     708
     709
    681710            end
    682711            else InstallMode = 0
    683         end
    684     end
    685 
    686     if \VRFileExists(swatusers) & swatauth = 1 & InstallMode = 0 then do
    687         Msg.Text = NLVGetMessage(115, swatusers)
    688         Msg.Type = "W"
    689         call _ShowMsg
    690     end
    691     IF options.!debug == 1 THEN say '  Does "'samba.!smbconf'" still exist? 'SmbConfExists' (1=Yes, 0=No)'
    692     IF options.!debug == 1 THEN say '  Running in InstallMode = 'InstallMode' (1=Yes, 0=No)'
    693 
    694     IF options.!debug == 1 THEN say '_SambaCheckComponents() done'
    695 return
     712 */
    696713/*:VRX         _SambaGroupMapInst
    697714*/
    … …  
    828845    id = VRMessageStem( VRWindow(), "smbmsg.", VRGet("Main", "Caption") , "I", "Buttons.", buttons.1, buttons.1 )
    829846return
     847
     848
     849
     850
     851
     852
     853
     854
     855
     856
     857
    830858/*:VRX         _SambaVersion
    831859*/
    … …  
    17001728return
    17011729
     1730
     1731
     1732
     1733
     1734
     1735
     1736
    17021737/*:VRX         CB_Store_DOS_attributes_Click
    17031738*/
    … …  
    17411776    if PropHandle.0 = 0 then do
    17421777        IF options.!debug == 1 THEN SAY 'CN_smbconf_Click() aborted, no handle'
     1778
    17431779        return
    17441780    end
    … …  
    17611797    if Prophandle.1 = smbconf.!root | Prophandle.1 = smbconf.!dirs | Prophandle.1 = smbconf.!printers then do
    17621798        IF options.!debug == 1 THEN SAY 'CN_smbconf_Click() aborted, got parent handle'
     1799
    17631800        return
    17641801    end
    … …  
    17851822            ObjXPos = 1325
    17861823            ObjDelta = 320
    1787             if Page = 1 then ActiveGroupObj = VRGet("GB_"ActiveGroup"_1", "Self")
     1824            if Page = 1 then do
     1825                if \VRIsValidObject("GB_"ActiveGroup"_1") then do
     1826                        ActiveGroupObj = VRCreate("GB_Global", "Window", "Name", "GL_GLOBAL_"Page, "Height", 1500, "Width", 1500, "Visible", 0, "Font", "9.WarpSans")
     1827                        IF options.!debug == 1 THEN say '  Neues Fenster VRCreate = 'ok
     1828                        ok = VRLoad( "GB_Global", VRWindowPath(), "GL_GLOBAL_"Page )
     1829                        IF options.!debug == 1 THEN say '  VRLoad = 'ok
     1830                        ok = VRMethod("GB_Global", "InsertPage", "GL_GLOBAL_"Page, "+"Page)
     1831                        IF options.!debug == 1 THEN  say '  InsertPage = 'ok
     1832
     1833/*                    ok = VRset("Main", "Painting", 1)
     1834                    Msg.Text = NLVGetMessage(114)
     1835                    Msg.Type = "I"
     1836                    call _ShowMsg
     1837                    return */
     1838                end
     1839                ActiveGroupObj = VRGet("GB_"ActiveGroup"_1", "Self")
     1840            end
    17881841        end
    17891842        else do
     1843
     1844
     1845
     1846
     1847
     1848
     1849
    17901850            ActiveGroupObj = "GB_"ActiveGroup
    17911851            ok = VRSet("DT_"ActiveGroup,"Caption",sections.I)
    … …  
    19001960        end
    19011961    end     
    1902     if upCurSection = "GLOBAL" & VRGet("EF_Netbios_name","Value") = "" then do
    1903         ok = VRset("EF_NETBIOS_NAME","Value",Value("HOSTNAME",,"OS2ENVIRONMENT"))
    1904         ok = VRFlush( , "EF_NETBIOS_NAME" )
    1905     end
    1906     if upCurSection = "GLOBAL" & VRGet("EF_WorkGroup","Value") = "" then do
    1907         ok = VRset("EF_WorkGroup","Value","WORKGROUP")
    1908         ok = VRFlush( , "EF_WorkGroup" )
     1962    if upCurSection = "GLOBAL" then do
     1963        if VRGet("EF_Netbios_name","Value") = "" then do
     1964            ok = VRset("EF_NETBIOS_NAME","Value",Value("HOSTNAME",,"OS2ENVIRONMENT"))
     1965            ok = VRFlush( , "EF_NETBIOS_NAME" )
     1966        end
     1967        if VRGet("EF_WorkGroup","Value") = "" then do
     1968            ok = VRset("EF_WorkGroup","Value","WORKGROUP")
     1969            ok = VRFlush( , "EF_WorkGroup" )
     1970        end
    19091971    end
    19101972
    … …  
    21022164        ok = VRSet("CB_NoRoot","Enabled", 0)
    21032165    end
     2166
     2167
     2168
    21042169    UseTDBsam = 1
    21052170    CreatePDC = 0
    … …  
    21902255
    21912256    call _FindHtpasswd
     2257
    21922258    call _SambaCheckComponents
    21932259    call _SambaVersion
    … …  
    22712337    ok = VRSet("GB_Global", "Width",  VRGet("GB_Shares",     "Width"))
    22722338
    2273     Button.Top   = VRGet("GB_SmbConfTree","height")+FWidth*2
    2274     Button.Left  = VRGet("GB_Shares","Left")
    2275     Button.Width = VRGet("PB_Create","Width")
    2276 
    2277     ok = VRSet("PB_Create", "Top",    Button.Top)
    2278     ok = VRSet("PB_Create", "Left",   Button.Left)
    2279 
    2280     ok = VRSet("PB_Reload", "Top",    Button.Top)
    2281     ok = VRSet("PB_Reload", "Left",   Button.Left-2*FWidth-Button.Width)
    2282     ok = VRSet("PB_Reload", "Width",  Button.Width)
    2283 
    2284     ok = VRSet("PB_Undo",   "Top",    Button.Top)
    2285     ok = VRSet("PB_Undo",   "Left",   Button.Left+2*FWidth+Button.Width)
    2286     ok = VRSet("PB_Undo",   "Width",  Button.Width)
    2287 
    2288     ok = VRSet("PB_Cancel", "Top",    Button.Top)
    2289     ok = VRSet("PB_Cancel", "Left",   Button.Left+4*FWidth+Button.Width*2)
    2290     ok = VRSet("PB_Cancel", "Width",  Button.Width)
    2291 
    2292     ok = VRSet("PB_Help",   "Top",    Button.Top)
    2293     ok = VRSet("PB_Help",   "Left",   Button.Left+6*FWidth+Button.Width*3)
    2294     ok = VRSet("PB_Help",   "Width",  Button.Width)
    2295 
    2296     drop Button.
     2339    MButton.bTop   = VRGet("GB_SmbConfTree","height")+FWidth*2
     2340    MButton.bLeft  = VRGet("GB_Shares","Left")
     2341    MButton.bWidth = VRGet("PB_Create","Width")
     2342
     2343    if MButton.bTop < 1300 & MButton.bLeft < 1300 then do
     2344        MButton.bTop = 4842
     2345        MButton.bLeft = 3758
     2346        MButton.bWidth = 1241
     2347        FWidth = 32
     2348    end
     2349
     2350    ok = VRSet("PB_Reload", "Top",    MButton.bTop)
     2351    ok = VRSet("PB_Reload", "Left",   MButton.bLeft)
     2352    ok = VRSet("PB_Reload", "Width",  MButton.bWidth)
     2353
     2354    ok = VRSet("PB_Create", "Top",    MButton.bTop)
     2355    ok = VRSet("PB_Create", "Left",   MButton.bLeft+1*FWidth+MButton.bWidth)
     2356    ok = VRSet("PB_Reload", "Width",  MButton.bWidth)
     2357
     2358    ok = VRSet("PB_Undo",   "Top",    MButton.bTop)
     2359    ok = VRSet("PB_Undo",   "Left",   MButton.bLeft+2*FWidth+MButton.bWidth*2)
     2360    ok = VRSet("PB_Undo",   "Width",  MButton.bWidth)
     2361
     2362    ok = VRSet("PB_Cancel", "Top",    MButton.bTop)
     2363    ok = VRSet("PB_Cancel", "Left",   MButton.bLeft+3*FWidth+MButton.bWidth*3)
     2364    ok = VRSet("PB_Cancel", "Width",  MButton.bWidth)
     2365
     2366 /* ok = VRSet("PB_Help",   "Top",    MButton.bTop)
     2367    ok = VRSet("PB_Help",   "Left",   MButton.bLeft+6*FWidth+MButton.bWidth*3)
     2368    ok = VRSet("PB_Help",   "Width",  MButton.bWidth) */
     2369
     2370    drop MButton.b
    22972371
    22982372    Top    = VRGet("Main","Top")
    … …  
    26612735        if \_SambaRootPWCheck() then return
    26622736    end
     2737
    26632738    call _SmbConfCreateDefault
    26642739    ok = SysFileTree(smbconf,exist.,'FO')
    … …  
    26702745    end
    26712746    call _SambaGuestCreate
     2747
     2748
     2749
    26722750    call _SambaGroupMapInst
    2673 
    2674     call Menu_File_ImportHosts_Click
     2751    ok = VRSet("Main", 'Pointer', '<default>' )
     2752   
    26752753
    26762754    call Installer_Close
    … …  
    26832761        if \_SambaRootPWCheck() then return
    26842762    end
     2763
     2764
    26852765    call _SmbConfMigratePeer
    26862766    ok = SysFileTree(smbconf,exist.,'FO')
    … …  
    26922772    end
    26932773    call _SambaGuestCreate
     2774
     2775
     2776
    26942777    call _SambaGroupMapInst
    2695 
    2696     call Menu_File_ImportHosts_Click
     2778    ok = VRSet("Main", 'Pointer', '<default>' )
     2779
     2780/*  call Menu_File_ImportHosts_Click */
    26972781
    26982782    call Installer_Close
    … …  
    27242808    call beep 960, 1
    27252809    address CMD samba.!smbcmd' reload'
     2810
     2811
     2812
     2813
     2814
     2815
     2816
     2817
     2818
     2819
     2820
     2821
     2822
     2823
     2824
     2825
     2826
     2827
     2828
     2829
     2830
     2831
     2832
     2833
     2834
     2835
     2836
     2837
     2838
    27262839return
    27272840
    … …  
    28242937return
    28252938
     2939
     2940
     2941
     2942
     2943
     2944
     2945
     2946
     2947
     2948
     2949
     2950
     2951
     2952
     2953
     2954
     2955
     2956
     2957
     2958
     2959
     2960
     2961
     2962
     2963
     2964
     2965
     2966
     2967
     2968
     2969
     2970
     2971
     2972
     2973
     2974
     2975
     2976
     2977
     2978
     2979
     2980
     2981
     2982
    28262983/*:VRX         TM_Installer_Trigger
    28272984*/

  • branches/guitools-1.0/install/sscc_de.mkm

    r344 r451  
    1717SSC0012I: ~Speichern
    1818SSC0013I: Freigeben
    19 SSC0014?:
     19SSC0014
    2020SSC0015?:
    2121SSC0016?:
    … …  
    6161SSC0054I: Abbruch.
    6262SSC0055I: kein Daemonmanagement m”glich
    63 SSC0056I: Aktuelle Datei "%1" l”schen und eine neue erzeugen?
     63SSC0056I: Aktuelle
    6464SSC0057I: Kein Passwort fr "%1" angegeben!
    6565SSC0058I: Bitte Passwort fr "%1" wiederholen!
    … …  
    8080SSC0073I: Aktuelle Konfiguration
    8181SSC0074I: Kleine Symbole
    82 SSC0075?:
     82SSC0075
    8383SSC0076?:
    8484SSC0077?:

  • branches/guitools-1.0/install/sscc_en.mkm

    r344 r451  
    1717SSC0012I: ~Save
    1818SSC0013I: Share
    19 SSC0014?:
     19SSC0014
    2020SSC0015?:
    2121SSC0016?:
    … …  
    6161SSC0054I: aborting.
    6262SSC0055I: unable to manage daemons
    63 SSC0056I: Erase current "%1" and create a new one?
     63SSC0056I: Erase current "%1" and create a new one
    6464SSC0057I: No password for "%1" provided.
    6565SSC0058I: Please repeat password for "%1".
    … …  
    8080SSC0073I: Current configuration
    8181SSC0074I: Small icons
    82 SSC0075?:
     82SSC0075
    8383SSC0076?:
    8484SSC0077?:

  • branches/guitools-1.0/install/sscc_es.mkm

    r344 r451  
    1717SSC0012I: ~Guardar
    1818SSC0013I: Compartir
    19 SSC0014?:
     19SSC0014
    2020SSC0015?:
    2121SSC0016?:
    … …  
    6060SSC0053I: No se puede localizar el componente de Samba "%1"
    6161SSC0054I: Abortando...
    62 SSC0055I: imposible administrar demonios
    63 SSC0056I: borrar actual "%1" y crear uno nuevo?
     62SSC0055I: mposible administrar demonios
     63SSC0056I:
    6464SSC0057I: No se indic¢ contrase€a para "%1".
    6565SSC0058I: Por favor, repita la contrase€a para "%1".
    … …  
    8080SSC0073I: Configuraci¢n actual
    8181SSC0074I: Iconos peque€os
    82 SSC0075?:
     82SSC0075
    8383SSC0076?:
    8484SSC0077?:

  • branches/guitools-1.0/install/sscc_fr.mkm

    r344 r451  
    1919SSC0012I: ~Sauvegarder
    2020SSC0013I: Partage
    21 SSC0014?:
     21SSC0014
    2222SSC0015?:
    2323SSC0016?:
    … …  
    6666SSC0054I: interruption.
    6767SSC0055I: gestion impossible des 'd‚mons'
    68 SSC0056I: Effacement de "%1" actuel et cr‚ation d'un nouveau ?
     68SSC0056I: Effacement de "%1" actuel et cr‚ation d'un nouveau
    6969SSC0057I: Aucun mot de passe donn‚ pour "%1" !
    7070SSC0058I: Veuillez retaper le mot de passe pour "%1" !
    … …  
    8686SSC0073I: Configuration actuelle
    8787SSC0074I: Ic“nes ~miniatures
    88 SSC0075?:
     88SSC0075
    8989SSC0076?:
    9090SSC0077?:

  • branches/guitools-1.0/install/sscc_sv.mkm

    r344 r451  
    1717SSC0012I: ~Spara
    1818SSC0013I: Dela ut
    19 SSC0014?:
     19SSC0014
    2020SSC0015?:
    2121SSC0016?:
    … …  
    6161SSC0054I: avbryter.
    6262SSC0055I: kan inte hantera ”vervakare
    63 SSC0056I: Ta bort aktuell fil "%1" och ers„tt med en ny?
     63SSC0056I: Ta bort aktuell
    6464SSC0057I: Inget l”senord har angivits f”r "%1"!
    6565SSC0058I: Upprepa l”senordet f”r "%1"!
    … …  
    8080SSC0073I: Aktuella konfigurationen
    8181SSC0074I: Sm† ikoner
    82 SSC0075?:
     82SSC0075
    8383SSC0076?:
    8484SSC0077?:
    … …  
    9797SSC0089?:
    9898SSC0090I: Installationsl„ge
    99 SSC0091I: Ange l”senord f”r rot-kontot
     99SSC0091I: Ange l”senord f”r -kontot
    100100SSC0092I: L”senord
    101101SSC0093I: Upprepa

  • branches/guitools-1.0/shared/sambainit.vrs

    r408 r451  
    4242    /* smbd.exe */
    4343    samba.!smbd = ""
     44
     45
     46
     47
     48
     49
     50
     51
     52
     53
     54
     55
     56
     57
     58
     59
     60
     61
     62
     63
     64
     65
     66
     67
    4468    if samba.!smbd = "" then do /* in current directory? */
    4569        call charout , "  Are binaries in current directory? "
    4670        ok = SysFileTree('.\smbd.exe', exist.,'FO')
    47         say exist.0' (1 = Yes, 0 = No)'
     71       
    4872        if exist.0 = 1 then samba.!smbd = exist.1
    4973    end
    … …  
    5175        call charout , "  Are binaries in parent directory? "
    5276        ok = SysFileTree('..\smbd.exe', exist.,'FO')
    53         say exist.0' (1 = Yes, 0 = No)'
     77       
    5478        if exist.0 = 1 then samba.!smbd = exist.1
    5579    end
    … …  
    5781        call charout , "  Are binaries in ..\BIN directory? "
    5882        ok = SysFileTree('..\bin\smbd.exe', exist.,'FO')
    59         say exist.0' (1 = Yes, 0 = No)'
     83       
    6084        if exist.0 = 1 then samba.!smbd = exist.1
    6185    end
    … …  
    7397    if samba.!smbd = "" then call _ErrorBinaryNotFound 'Could not find smbd.exe!'
    7498
     99
    75100    samba.!bin = VRParseFileName(samba.!smbd,'DP')
    76101    IF options.!debug == 1 THEN say '  Samba binaries = "'samba.!bin'"'
     102
    77103
    78104    /* smb.cmd */
    … …  
    299325
    300326/*:VRX */
    301 _SambaRunning: procedure expose running. pids. TempDir HaveWinbindd options.
     327_SambaRunning: procedure expose running. pids. TempDir HaveWinbindd options.
    302328    IF options.!debug == 1 THEN say '_SambaRunning() started'
    303329

  • branches/guitools-1.0/shared/swat.vrs

    r277 r451  
    1515        end
    1616    end
     17
     18
     19
     20
     21
     22
     23
     24
     25
     26
     27
     28
     29
    1730    if samba.!htpasswdexe = "" then do /* in current directory? */
    1831        call charout , "  Is htpasswd.exe in current directory? "
    1932        ok = SysFileTree('.\htpasswd.exe', exist.,'FO')
    20         say exist.0' (1 = Yes, 0 = No)'
     33       
    2134        if exist.0 = 1 then samba.!htpasswdexe = exist.1
    2235    end
    … …  
    2437        call charout , "  Is htpasswd.exe in parent directory? "
    2538        ok = SysFileTree('..\htpasswd.exe', exist.,'FO')
    26         say exist.0' (1 = Yes, 0 = No)'
     39       
    2740        if exist.0 = 1 then samba.!htpasswdexe = exist.1
    2841    end
    … …  
    3043        call charout , "  Is htpasswd.exe in ..\BIN directory? "
    3144        ok = SysFileTree('..\bin\htpasswd.exe', exist.,'FO')
    32         say exist.0' (1 = Yes, 0 = No)'
     45       
    3346        if exist.0 = 1 then samba.!htpasswdexe = exist.1
    3447    end
    … …  
    3649        call charout , "  Is htpasswd.exe in "SysBootDrive()"\apache2\bin path? "
    3750        ok = SysFileTree(SysBootDrive()'\apache2\bin\htpasswd.exe', exist.,'FO')
    38         say exist.0' (1 = Yes, 0 = No)'
     51       
    3952        if exist.0 = 1 then samba.!htpasswdexe = exist.1
    4053    end
    … …  
    4255        call charout , "  Is htpasswd.exe in ..\..\apache2\bin path? "
    4356        ok = SysFileTree('..\..\apache2\bin\htpasswd.exe', exist.,'FO')
    44         say exist.0' (1 = Yes, 0 = No)'
     57       
    4558        if exist.0 = 1 then samba.!htpasswdexe = exist.1
    4659    end

  • branches/guitools-1.0/smbmon/changes

    r302 r451  
    1 Version 0.9.26
    2                         WIP: Add findsmb functionality
     1Version 0.9.26 06-03-2010 (final 0.9.x release)
     2                        +Added: SambaInit.VRS: _SambaInit() acts more
     3                                intelligently now
     4                        *Changed: Use NLV.VRS 2.0 instead of 1.0
     5                        +WIP: Add findsmb functionality, deactivated
     6                              (will not be completed in the 0.9.x series)
    37Version 0.9.25 27-06-2009
    48                        +Added: Check free space on TMPDIR

  • branches/guitools-1.0/smbmon/smbmon.vrp

    r333 r451  
    77VRXWindow: __VREMainWindow,1,2180,3710,940,8000
    88VRXWindow: __VRESectionListWindow,1,2650,12093,9359,3300
    9 VRXWindow: __VREToolsWindow,1,2204,1590,7501,1663
     9VRXWindow: __VREToolsWindow,1,2204,1590,
    1010VRXWindow: __VREWindListWindow,1,265,12093,2650,3150
    1111UserFile: 1

  • branches/guitools-1.0/smbmon/smbmon.vrx

    r302 r451  
    9393#append U:\Develop\Samba\guitools-1.0\shared\InitTempDir.VRS
    9494#append U:\Develop\Samba\guitools-1.0\shared\SambaInit.vrs
    95 #append U:\Develop\Samba\guitools-1.0\shared\nlv.vrs
     95#append U:\Develop\Samba\guitools-.0\shared\nlv.vrs
    9696*/
    9797return

  • branches/guitools-1.0/smbusers/changes

    r409 r451  
     1
     2
     3
     4
     5
     6
    17Version 0.9.6 19-02-2010
    28                         !Fixed: Changing the password crashed smbusers.exe

  • branches/guitools-1.0/smbusers/smbusers.VRP

    r408 r451  
    33MacroPath: VRM:U:\Develop\Samba\guitools-1.0\smbusers
    44EXEPath:
    5 RunParameters:
     5RunParameters:
    66RunDirectory: U:\Develop\Samba\guitools-1.0\smbusers
    77VRXWindow: __VREMainWindow,1,2180,3710,891,8000
    8 VRXWindow: __VRESectionListWindow,1,2951,11130,8949,3342
    9 VRXWindow: __VREToolsWindow,1,2457,1012,6986,1669
     8VRXWindow: __VRESectionListWindow,1,2951,
     9VRXWindow: __VREToolsWindow,1,2457,1012,69,1669
    1010VRXWindow: __VREWindListWindow,1,446,11130,2650,3150
    1111UserFile: 1
    1212UserWindow: Main,1
     13

  • branches/guitools-1.0/smbusers/smbusers.VRX

    r408 r451  
    9191__VXREXX____APPENDS__:
    9292/*
    93 #append U:\Develop\Samba\guitools-1.0\shared\nlv.vrs
     93#append U:\Develop\Samba\guitools-.0\shared\nlv.vrs
    9494#append U:\Develop\Samba\guitools-1.0\shared\inittempDir.vrs
    9595#append U:\Develop\Samba\guitools-1.0\shared\sambainit.vrs
    … …  
    614614    call rxfuncadd 'IniLoadFuncs', 'REXXINI', 'IniLoadFuncs'
    615615    call IniLoadFuncs
     616
     617
     618
    616619
    617620    /* Deal with DRCtrlxxx */
    … …  
    16131616/*:VRX         _UserRecWriteBackToStems
    16141617*/
    1615 _UserRecWriteBackToStems:
     1618_UserRecWriteBackToStems:
     1619    if \VRIsValidObject( RH )  then return
    16161620    Cur = VRMethod("CN_Users","GetFieldData", RH, NrFH)
    16171621    Username.Cur = VRMethod("CN_Users","GetFieldData", RH, UsernameFH)
    … …  
    21192123return
    21202124
     2125
     2126
     2127
     2128
     2129
     2130
    21212131/*:VRX         CN_Users_ContextMenu
    21222132*/
    21232133CN_Users_ContextMenu:
     2134
    21242135    if VRInfo("Top") < 1325 & VRGet("CN_users", "View") = "Detail" then call _ColumnsMenu "CN_users"
    21252136    else do
    … …  
    21362147*/
    21372148CN_Users_DoubleClick:
     2149
    21382150    say 'CN_Users_DoubleClick() started'
    21392151    RH = VRInfo("Record")
    … …  
    21462158*/
    21472159CN_Users_EndEdit:
     2160
     2161
     2162
     2163
    21482164    call beep 880, 20
    21492165    RH = VRInfo("Record")
    … …  
    30893105
    30903106    call _SambaInit
     3107
    30913108    if ErrorState then call _OnErrorDisable
     3109
    30923110    if StartSamba then do
    30933111        address cmd samba.!smbcmd' start'
    30943112    end
     3113
    30953114    if \_SambaRunning() then do
    30963115        Msg.Text  = NLVGetMessage(107)
Note: See TracChangeset for help on using the changeset viewer.