Code: Select all
^F1::
{
IB := InputBox("Name and Surname", "Data", "w240 h100")
if DirExist("C:\Clients\%IB%")
{
MsgBox "exists"
Run "C:\Clients\%IB%"
}
else
{
MsgBox "doesnt exist"
}
}
Code: Select all
^F1::
{
IB := InputBox("Name and Surname", "Data", "w240 h100")
if DirExist("C:\Clients\%IB%")
{
MsgBox "exists"
Run "C:\Clients\%IB%"
}
else
{
MsgBox "doesnt exist"
}
}
Code: Select all
^F1::
{
IB := InputBox("Name and Surname", "Data", "w240 h100")
if DirExist("C:\Clients\" . IB)
{
MsgBox "exists"
Run "C:\Clients\" . IB
}
else
{
MsgBox "doesnt exist"
DirCreate("C:\Clients\" . IB)
}
}
Code: Select all
obj := InputBox(...)
obj.result ; this is "OK", "Cancel", or "Timeout"
obj.value ; this is the value typed in the InputBox
Users browsing this forum: aalphaa and 52 guests