Uživatelské nástroje

Nástroje pro tento web


wiki:user:stod_-_dalsi_poznamky

Rozdíly

Zde můžete vidět rozdíly mezi vybranou verzí a aktuální verzí dané stránky.

Odkaz na výstup diff

wiki:user:stod_-_dalsi_poznamky [2008/12/04 17:43]
stod
wiki:user:stod_-_dalsi_poznamky [2008/12/09 17:06] (aktuální)
stod
Řádek 17: Řádek 17:
 Nejprve nainstalovat:​ SVN a Flex: http://​www.flashmagazine.com/​tutorials/​detail/​setting_up_subversion_with_adobe_flex_3/​ Nejprve nainstalovat:​ SVN a Flex: http://​www.flashmagazine.com/​tutorials/​detail/​setting_up_subversion_with_adobe_flex_3/​
   * zda se, ze oproti navodu je potreba nainstalovat i JavaHL Adapter (pri instalovani Subclipse se da zaskrtnout)   * zda se, ze oproti navodu je potreba nainstalovat i JavaHL Adapter (pri instalovani Subclipse se da zaskrtnout)
 +
 +Nejlepsi zpusob:
 +  * vycheckoutovat projekt z SVN - v jednom podadresari bude Flex projekt a v druhem webservice
 +  * prepnout Flex na novy workspace v tomto adresari -- vytvori v nem adresar .metadata (ten neni v svn)
 +  * pravym tlacitkem mysi na Flex Navigator, Import, General, Existing project
 +  * vybrat adresar s projektem a vybrat projekt, ktery se "​naimportuje"​
 +  * NEZASKRTAVAT Copy to workspace
 +
 +Horsi zpusob:
 +  * Zalozit novy adresar, kde je libo napr. D:​\Programy\Specimens\
 +  * Ve Flexu prepnout workspace do tohoto adresare - vytvori se novy workspace
 +  * kliknout pravym na Flex Navigator, Import, SVN a udelat checkout Flexoveho projektu z SVN
 +  * Do adresare s Workspacem se da prikopirovat Projekt s Webservicem. V adresari workspacu budou dva podadresare spravovane kazdy zvlast na svn.
 +
 +
 +''​crossdomain.xml'',​ ktery musi byt v rootu webserveru, na kterem bezi web-service:​
 +<​code>​
 +<?xml version="​1.0"​ ?> 
 +<​cross-domain-policy>​
 +  <​site-control permitted-cross-domain-policies="​all"​ /> 
 +  <​allow-access-from domain="​*"​ /> 
 +  <​allow-http-request-headers-from domain="​*"​ headers="​*"​ /> 
 +</​cross-domain-policy>​
 +</​code>​
 +
 +===== Specimens =====
 +  * vyřešit propagaci výjimek z webservice do Flexu
  
 ===== VBS ===== ===== VBS =====
 Skript na založení nového uživatele Skript na založení nového uživatele
 <​code>​ <​code>​
-' Na prikazovem radku bere jako parametr username 
-' Vytvori startup skript pro uzivatele, ktery mu mapuje disky L: a P: 
-' Vytvori adresar na file-serveru,​ ktery se namapuje na L: 
 ' vytvori uzivatele podle parametru skriptu '​username'​ '​jmeno'​ '​prijmeni'​ ' vytvori uzivatele podle parametru skriptu '​username'​ '​jmeno'​ '​prijmeni'​
 ' nastavi mu jmeno a prihlasovaci skript ' nastavi mu jmeno a prihlasovaci skript
 ' prida ho do skupiny patf-users ' prida ho do skupiny patf-users
- +' Vytvori startup skript pro uzivatele, ktery mu mapuje disky L: a P: 
-'Option Explicit+' Vytvori adresar na file-serveru,​ ktery se namapuje na L: 
 +' ​Nastavi uzivateli pristup k tomuto adresari
  
 if WScript.Arguments.Count <> 3 Then  if WScript.Arguments.Count <> 3 Then 
Řádek 34: Řádek 59:
   WScript.Quit   WScript.Quit
 end If end If
 +
 +userName = WScript.Arguments(0)
 +strGivenName = WScript.Arguments(1)
 +strSecondName = WScript.Arguments(2)
  
  
Řádek 42: Řádek 71:
 Const foldersPath = "​\\file-server\users\"​ Const foldersPath = "​\\file-server\users\"​
  
-userName ​WScript.Arguments(0)+strPassword ​"​carramba"​
 userScriptFileName = userName & "​.bat"​ userScriptFileName = userName & "​.bat"​
 userScriptFile = profilesPath & userScriptFileName userScriptFile = profilesPath & userScriptFileName
 userFolderPath = foldersPath & userName userFolderPath = foldersPath & userName
- 
- 
-Set objFSO = CreateObject("​Scripting.FileSystemObject"​) 
-Set objFile = objFSO.OpenTextFile(templateScriptFile,​ ForReading) 
- 
-strText = objFile.ReadAll 
-objFile.Close 
-strNewText = Replace(strText,​ "<​username>",​ userName) 
- 
-Set objFile = objFSO.OpenTextFile(userScriptFile,​ ForWriting, True) 
-objFile.Write strNewText 
-objFile.Close 
- 
-WScript.Echo "File created: " & userScriptFile 
- 
-objFSO.CreateFolder(userFolderPath) 
- 
-WScript.Echo "​Directory created: " & userFolderPath 
- 
-''''''''''''''''''''''''​ 
- 
  
  
Řádek 74: Řádek 82:
  
 strUser = userName strUser = userName
-strGivenName = WScript.Arguments(1) 
-strSecondName = WScript.Arguments(2) 
-strPassword = "​carramba"​ 
  
 strContainer = "​cn=Users ," ' Note the comma strContainer = "​cn=Users ," ' Note the comma
Řádek 113: Řádek 118:
 WScript.Echo "User created: " & strGivenName & " " & strSecondName & "; Password: " & strPassword WScript.Echo "User created: " & strGivenName & " " & strSecondName & "; Password: " & strPassword
  
-WScript.Quit 
-</​code>​ 
  
 +Set objFSO = CreateObject("​Scripting.FileSystemObject"​)
 +Set objFile = objFSO.OpenTextFile(templateScriptFile,​ ForReading)
  
-Nejlepsi zpusob: +'​Create the startup script 
-  * vycheckoutovat projekt z SVN - v jednom podadresari bude Flex projekt a v druhem webservice +strText = objFile.ReadAll 
-  * prepnout Flex na novy workspace v tomto adresari -- vytvori v nem adresar ​.metadata ​(ten neni v svn) +objFile.Close 
-  * pravym tlacitkem mysi na Flex Navigator, Import, General, Existing project +strNewText = Replace(strText, "<​username>​", userName)
-  * vybrat adresar s projektem a vybrat projektktery se "naimportuje" +
-  * NEZASKRTAVAT Copy to workspace+
  
-Horsi zpusob: +Set objFile = objFSO.OpenTextFile(userScriptFileForWritingTrue) 
-  * Zalozit novy adresar, kde je libo naprD:​\Programy\Specimens\ +objFile.Write strNewText 
-  * Ve Flexu prepnout workspace do tohoto adresare - vytvori se novy workspace +objFile.Close
-  * kliknout pravym na Flex NavigatorImportSVN a udelat checkout Flexoveho projektu z SVN +
-  * Do adresare s Workspacem se da prikopirovat Projekt s WebservicemV adresari workspacu budou dva podadresare spravovane kazdy zvlast na svn.+
  
 +WScript.Echo "​Script file created: " & userScriptFile
 +
 +'​Create the home folder
 +objFSO.CreateFolder(userFolderPath)
 +WScript.Echo "​Directory created: " & userFolderPath
 +
 +'​Assign user's permissions
 +Set objShell = CreateObject("​Wscript.Shell"​)
 +intRunError = objShell.Run("​%COMSPEC% /c Echo Y| cacls "_
 +     & userFolderPath & " /e /g "_
 +     & userName & ":​C",​ 2, True)
 +If intRunError <> 0 Then
 +  Wscript.Echo "Error assigning permissions for user " _
 +    & userName & " to folder " & userFolderPath
 +Else
 +  Wscript.Echo "​Permissions for user " _
 +    & userName & " to folder " & userFolderPath & "​assigned."​
 +End If
 +
 +
 +WScript.Quit
  
-''​crossdomain.xml'',​ ktery musi byt v rootu webserveru, na kterem bezi web-service:​ 
-<​code>​ 
-<?xml version="​1.0"​ ?>  
-<​cross-domain-policy>​ 
-  <​site-control permitted-cross-domain-policies="​all"​ />  
-  <​allow-access-from domain="​*"​ />  
-  <​allow-http-request-headers-from domain="​*"​ headers="​*"​ />  
-</​cross-domain-policy>​ 
 </​code>​ </​code>​
- 
-===== Specimens ===== 
-  * vyřešit propagaci výjimek z webservice do Flexu 
wiki/user/stod_-_dalsi_poznamky.txt · Poslední úprava: 2008/12/09 17:06 autor: stod