Whitespliff
Joined: 09 Feb 2006
Posts: 33
|
 Posted: Sat Jan 20, 2007 1:55 pm Post subject: Anybody knows a program to manage stocks? |
 |
|
Hello,
I've been trying to make a script for creating a way to manage stock for gsm's.
There are a lot of Nokia, Samsung & Sony Ericsson devices.
I would like them ordered by brand & type.
If I select a type (Nokia 1600 for ex), a listview (or something) on the right would display how many there are in stock & wich colors.
Being able to add & substract the stock would be usefull too.
I've been searching the forum but I can't find anything that comes close & I can't get it to work.
This is a first try...
| Code: | N1600 = 11
N2310 = 2
N2610 = 1
N5200 = 5
N5300 = 2
N5500 = 5
N6020 = 2
N6021 = 1
N6070 = 4
N6080 = 1
N6101 = 0
N6103 = 5
N6111 = 3
N6131 = 2
N6151 = 3
N6233 = 4
N6288 = 1
N6600 = 1
N6630 = 1
N7360 = 1
N7373 = 1
N_E50 = 5
N_E60 = 1
N_N72 = 1
Menu, Tray, Tip, Stockbeheer
Menu, Tray, add, &Sluit Stockbeheer, exit
menu,Settings, Add,&Preferences,Settings
menu,Settings, Add
menu,Settings, Add,Change &Source Folder,ChangeSource
menu,Settings, Add,Change &Destination Folder,ChangeDestination
menu,Settings, Add
menu,Settings, Add,&Exit,MenuHandler6
menu, myMenuBar, Add,&Settings,:Settings
menu,Tools, Add,Run &MuxMan Ctrl+M,Muxman
menu,Tools, Add
menu,Tools, Add,Open &Source Folder,Settings
menu,Tools, Add,Open &Destination Folder,Settings
menu,Tools, Add,Open &Program Folder,Settings
menu, myMenuBar, Add,&Tools,:Tools
menu,help, Add, &Check for Updates,Settings
menu,help, Add
menu,help, Add,&Help,Settings
menu,help, Add,&About,MenuHandler3
menu, myMenuBar, Add,&Help,:Help
gui, menu,MyMenuBar
Gui, Font, S24 CDefault Bold, Verdana
Gui, Add, Text, x90 y17 w600 h40 , PEETERMANS GSM Stockbeheer
Gui, Font, S8 CDefault, Verdana
Gui, Add, GroupBox, x6 y47 w770 h510 , Nokia
Gui, Add, ListBox, x36 y77 w150 h100 gType vChoice Sort, 1600|2310|2610|5200|5300|5500|6020|6021|6070|6080|6101|6103|6111|6131|6151|6233|6288|6600|6630|7360|7373|E50|E60|N72
Gui, Add, Button, x666 y517 w100 h30 , Sluiten
Gui, Add, ListView, x200 y77 r2 w200 gMyListView, Aantal|Kleur
Gui, Show, h563 w784, Peetermans GSM Stock
Return
GuiClose:
ButtonSluiten:
ExitApp
MyListView:
if A_GuiEvent = DoubleClick
{
MsgBox, Er zijn %N1600% toestellen in stock.
}
return
; GuiClose: ; Indicate that the script should exit automatically when the window is closed.
; ExitApp
Type:
GuiControlGet, Choice
if Choice = 1600
LV_Add("", 11)
; LV_ModifyCol() ; Auto-size each column to fit its contents.
; LV_ModifyCol(2, "Integer")
; MsgBox, Er zijn %N1600% toestellen in stock.
if Choice = 2310
LV_Add("", 4)
; MsgBox, Er zijn %N2310% toestellen in stock.
if Choice = 2610
MsgBox, Er zijn %N2610% toestellen in stock.
if Choice = 5200
MsgBox, Er zijn %N5200% toestellen in stock.
if Choice = 5300
MsgBox, Er zijn %N5300% toestellen in stock.
if Choice = 5500
MsgBox, Er zijn %N5500% toestellen in stock.
if Choice = 6020
MsgBox, Er zijn %N6020% toestellen in stock.
if Choice = 6021
MsgBox, Er zijn %N6021% toestellen in stock.
if Choice = 6070
MsgBox, Er zijn %N6070% toestellen in stock.
if Choice = 6080
MsgBox, Er zijn %N6080% toestellen in stock.
if Choice = 6101
MsgBox, Er zijn %N6101% toestellen in stock.
if Choice = 6103
MsgBox, Er zijn %N6103% toestellen in stock.
if Choice = 6131
MsgBox, Er zijn %N6131% toestellen in stock.
if Choice = 6151
MsgBox, Er zijn %N6151% toestellen in stock.
if Choice = 6233
MsgBox, Er zijn %N6233% toestellen in stock.
if Choice = 6288
MsgBox, Er zijn %N6288% toestellen in stock.
if Choice = 6600
MsgBox, Er zijn %N6600% toestellen in stock.
if Choice = 6630
MsgBox, Er zijn %N6630% toestellen in stock.
if Choice = 7360
MsgBox, Er zijn %N7360% toestellen in stock.
if Choice = 7373
MsgBox, Er zijn %N7373% toestellen in stock.
if Choice = E50
MsgBox, Er zijn %N_E50% toestellen in stock.
if Choice = E60
MsgBox, Er zijn %N_E60% toestellen in stock.
if Choice = N72
MsgBox, Er zijn %N_N72% toestellen in stock.
return
;-----------------------------------------------------------------------------------------
exit:
ExitApp
return
;------------------------------------------------------------------------------------------
Settings:
return
;----------------------------------------------------------------------------------------
ChangeSource:
return
;----------------------------------------------------------------------------------------
ChangeDestination:
return
;----------------------------------------------------------------------------------------
MenuHandler6:
return
;----------------------------------------------------------------------------------------
MuxMan:
return
;----------------------------------------------------------------------------------------
MenuHandler3:
Gui, 2:+owner -SysMenu
Gui, 2:Add, Button, x76 y61 w65 h23 default, OK
Gui, 2:Add, GroupBox, x0 y0 w220 h94
Gui, 2:Font, S10 Bold
Gui, 2:Add, Text, x78 y12 w120,Stockbeheer
Gui, 2:Font, S8 norm
Gui, 2:Font, underline
Gui, 2:Add, Text, x82 y29 w50 cBlue gWhiteWeb,WhiteWeb
Gui, 2:Font, norm
Gui, 2:Add, Text, x82 y44 w110, version 0.1
Gui, 2: Show, h93 w220, Stockbeheer
hCurs:=DllCall("LoadCursor","UInt",NULL,"Int",32649,"UInt") ;IDC_HAND
OnMessage(0x200,"WM_MOUSEMOVE")
Return
WM_MOUSEMOVE(wParam,lParam)
{
Global hCurs
MouseGetPos,,,,ctrl
If ctrl in Static2
DllCall("SetCursor","UInt",hCurs)
Return
}
2GuiEscape:
2GuiClose:
2ButtonOK:
GUI, 2:Destroy
return
;---------------------------------------------------------------------------------------
WhiteWeb:
Run, mailto:whiteweb@telenet.be?subject=Stockbeheer
return
;---------------------------------------------------------------------------------------- |
Any help is very welcome 
_________________
In a world without walls and fences, who needs Windows and Gates? |
|
FAQ
Search
Memberlist
Register
Profile
Log in to check your private messages
Log in
