Einzelnen Beitrag anzeigen

MathiasSimmack
(Gast)

n/a Beiträge
 
#12

Re: C#Develop und ListView

  Alt 31. Okt 2005, 13:29
Zitat von Robert_G:
Das Setup wird schon alles weggeworfen haben,
Das Setup ist ziemlich rabiat, was die Dateien im Programmordner angeht. Es lässt aber den Profilordner in Ruhe. Interessanter Effekt beim Updaten von .NET 2.0 Beta 2 auf .NET 2.0 Final: Meine integrierte Hilfe war verschwunden bzw. deaktiviert, obwohl alles korrekt installiert war. Lösung: Profilordner löschen. Ich habe keine Ahnung, wieso, aber es half.


Bzgl Corsavy: Das folgende VBSkript stammt aus meinem Fundus und setzt ein installiertes SubVersion voraus:
Code:
' New Fidalgo Repository
' Script Copyright (c) 2005 Mathias Simmack
On Error Resume Next
const scriptLogo     = "New Corsavy Repository Script"
const scriptCopyright = "Copyright (c) 2005 Mathias Simmack"

' initialize
Dim Sh, fso
Set Sh = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")


' what about the parameter?
Dim repositoryDir
repositoryDir = WScript.Arguments.Item(0)

If repositoryDir = "" Then
   WScript.Echo scriptLogo & vbCrLf & scriptCopyright & vbCrLf & _
      "This script requires the name of a destination folder. Example:" & vbCrLf & vbCrLf & _
      WScript.ScriptName & " ""C:\Corsavy.Repository"""
   WScript.Quit
End If

If fso.FolderExists(repositoryDir) Then
   WScript.Echo scriptLogo & vbCrLf & scriptCopyright & vbCrLf & vbCrLf & _
      "The chosen folder """ & repositoryDir & """ does already exist."
   WScript.Quit
End If


' is SubVersion installed?
Dim svnApp
const subVersionKey = "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\svn.exe\Path"
svnApp             = Sh.RegRead(subVersionKey) & "\bin\svn.exe"

If Not fso.FileExists(svnApp) Then
   WScript.Echo "SubVersion is not installed or not available. You can get it here" & _
      vbCrLf & "http://subversion.tigris.org/project_packages.html"
   WScript.Quit
End If


' call svn to download the latest repository files
const svnParams = "co svn://glumpatweri.emailgwiax.com/Corsavy/trunk"
Sh.Run svnApp & " " & svnParams & " " & repositoryDir, 1, true
Danach reicht ein simples:
Code:
cscript NewCorsavyRepository.vbs h:\MeinOrdnerfürCorsavy
und das Teil zieht sich den aktuellen Code in den zuletzt angegebenen Ordner.
  Mit Zitat antworten Zitat