[B][SIZE=2][COLOR=#000080]OpenFile[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("All Files (*.*)|*.*|All Files|*.*||","*.*")
hg$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'WAIT,HIDE +s +h '[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+OpenFile$
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]
Run[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("<[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]System[/COLOR][/SIZE][SIZE=2][COLOR=#010101]>\attrib.exe","hg$")[/COLOR][/SIZE]
جناب splinter cell ممنون
در همین فرمان بالا اگه هر فایلی رو که می خواهیم از طریق browseforfolder و یک editbox انتخاب کنیم تا کد اعمال بشه چطور باید کد نویسی کنیم؟
[SIZE=2][COLOR=#008000]**[/COLOR][/SIZE][FONT=Courier New][SIZE=2][COLOR=#008000]Remove a[/COLOR][/SIZE][/FONT][SIZE=2][COLOR=#008000] directory
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
dir$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'C:\folder test MMB'
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
param_nt$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'WAIT,HIDE /c rmdir '[/COLOR][/SIZE][SIZE=2][COLOR=#010101] +[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+ dir$+[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
param_9x$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'WAIT,HIDE /c rmdir '[/COLOR][/SIZE][SIZE=2][COLOR=#010101] +[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+ dir$+[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]
If[/COLOR][/SIZE][SIZE=2][COLOR=#010101] ([/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]UsingWinNT[/COLOR][/SIZE][SIZE=2][COLOR=#010101]()) [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Then
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
[/COLOR][/SIZE][SIZE=2][COLOR=#008000]** on WinXP/2k
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]Run[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("<[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]System[/COLOR][/SIZE][SIZE=2][COLOR=#010101]>\cmd.exe","param_nt$")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]
Else
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
[/COLOR][/SIZE][SIZE=2][COLOR=#008000]** on Win9x
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]Run[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("c:\command.com","param_9x$")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]
End
[/COLOR][/SIZE]
[B][SIZE=2][COLOR=#000080]BrowseForFolder[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("","")
OpenFile$=[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]CBK_OpenDir
If[/COLOR][/SIZE][SIZE=2][COLOR=#010101] (OpenFile$<>[/COLOR][/SIZE][SIZE=2][COLOR=#800000]''[/COLOR][/SIZE][SIZE=2][COLOR=#010101]) [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Then
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]Text$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'Are Youe Sure To Hide File: '[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+OpenFile$
Param$=Text$+[/COLOR][/SIZE][SIZE=2][COLOR=#800000]',36,0'
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]MessageEx[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101](" Hide File","Param$")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]If[/COLOR][/SIZE][SIZE=2][COLOR=#010101] ([/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]CBK_MsgEx[/COLOR][/SIZE][SIZE=2][COLOR=#010101]=[/COLOR][/SIZE][SIZE=2][COLOR=#ff0000]6[/COLOR][/SIZE][SIZE=2][COLOR=#010101]) [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Then
[/COLOR][/SIZE][SIZE=2][COLOR=#008000]**Your Script Action : Yes
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]hg$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'WAIT,HIDE +s +h '[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'[/COLOR][/SIZE][SIZE=2][COLOR=#010101]+OpenFile$+[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'"'
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]Run[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("<[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]System[/COLOR][/SIZE][SIZE=2][COLOR=#010101]>\attrib.exe","hg$")
FileName$=[/COLOR][/SIZE][SIZE=2][COLOR=#800000]'C:\Fpath.dll'
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]String$=OpenFile$
Append=[/COLOR][/SIZE][SIZE=2][COLOR=#ff0000]1
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]LineFeed=[/COLOR][/SIZE][SIZE=2][COLOR=#ff0000]1
[/COLOR][/SIZE][SIZE=2][COLOR=#010101]savepath=[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]StrToFile[/COLOR][/SIZE][SIZE=2][COLOR=#010101](FileName$,String$,Append,LineFeed)
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]RunScript[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("Script-del null line")
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]Show[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("view")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]End
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]If[/COLOR][/SIZE][SIZE=2][COLOR=#010101] ([/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]CBK_MsgEx[/COLOR][/SIZE][SIZE=2][COLOR=#010101]=[/COLOR][/SIZE][SIZE=2][COLOR=#ff0000]7[/COLOR][/SIZE][SIZE=2][COLOR=#010101]) [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Then
[/COLOR][/SIZE][SIZE=2][COLOR=#008000]**Your Script Action : No
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]RunScript[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("Script-del null line")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]End
Else
[/COLOR][/SIZE][B][SIZE=2][COLOR=#000080]Message[/B][/COLOR][/SIZE][SIZE=2][COLOR=#010101]("select Your File For Hide","")
[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]End
[/COLOR][/SIZE]









