Inputbox

[Qual-IT London 0]

does anyone know if you use an input box how you can clear it?

#include <GUIConstants.au3>

dim $share,$uname,$pw

$Main = GUICreate("input",320,200)

$sharen = GuiCtrlCreateInput($share, 120, 55, 170, 20)

$usname = GuiCtrlCreateInput($uname, 120, 80, 170, 20)

$pwd = GuiCtrlCreateInput($pw, 120, 105, 170, 20)

$Submit = GuiCtrlCreateButton("Add", 120,140,70,20)

GuiSetState(@SW_SHOW,$main)

If Not WinActive($Main) Then WinActivate($Main)

While 1

$msg = GUIGetMsg()

select

Case $msg = $GUI_EVENT_CLOSE

exit (3)

Case $msg = $submit

$share = GuiCtrlRead ($sharen)

$uname = GuiCtrlRead ($usname)

$pw = GuiCtrlRead ($pwd)

for $i = 1 to 1

if $share = "" Then

msgbox (16,"Question","Please give input")

exitloop

endif

iniwrite ("~netfldr.qbw", $share,"Name",$share)

if not $uname = "" Then IniWrite ( "~netfldr.qbw", $share, "User", $uname )

if not $pw = "" Then IniWrite ( "~netfldr.qbw", $share, "Password", $pw )

GUICtrlSetData($share, '')

GUICtrlSetData($uname, '') ; <------ here im tryin to clear the boxes to take

GUICtrlSetData($pw, '') the input again!

guictrlclose()

GuiSetState(@SW_SHOW,$main)

next

EndSelect

WEnd

GUIDelete()

Exit

[greenmachine 4]

You have to set the data of the control, not the text.

You try to clear these:

GUICtrlSetData($share, '')

GUICtrlSetData($uname, '') ; <------ here im tryin to clear the boxes to take

GUICtrlSetData($pw, '') the input again!

But these are the controls:

$sharen = GuiCtrlCreateInput($share, 120, 55, 170, 20)

$usname = GuiCtrlCreateInput($uname, 120, 80, 170, 20)

$pwd = GuiCtrlCreateInput($pw, 120, 105, 170, 20)

Edited March 27, 2006 by greenmachine

[Qual-IT London 0]

You have to set the data of the control, not the text.

You try to clear these:

GUICtrlSetData($share, '')

GUICtrlSetData($uname, '') ; <------ here im tryin to clear the boxes to take

GUICtrlSetData($pw, '') the input again!

But these are the controls:

$sharen = GuiCtrlCreateInput($share, 120, 55, 170, 20)

$usname = GuiCtrlCreateInput($uname, 120, 80, 170, 20)

$pwd = GuiCtrlCreateInput($pw, 120, 105, 170, 20)

doh!