Beiträge von mid

Zitat von Oscar

Wir könnten Dir sicher helfen! Vorausgesetzt Du postest mal Dein Script.

Moin,
na sicher... der Code
Ich wollte nur mal erstmal einige Versuche unternehmen. Aber bis jetzt ist wohl so richtig noch nichts gescheites dabei entstanden.
Naja, ich habe tausend diverse Verzeichnisse, Variablen, Cases, etc...

#include <Array.au3>
#include <File.au3>
#include <FileConstants.au3>
#include <Constants.au3>


;; => VARIABLEN BEGINN
$sSource = InputBox('Update-Quelle','Bitte den Pfad zur Updatequelle angeben.'&@CRLF&@CRLF&'Standpfad hierbei:','K:\Installationsquelle\'&@YEAR&'\',"",400,150)
$sDestination = InputBox('Update-Ziel','Bitte Installation angeben.'&@CRLF&@CRLF&'Standpfad hierbei:','S:\InstOrdner\',"",400,150)
;; => VARIABLEN ENDE
MsgBox(260,"Angaben","Stimmt der Quellpfad? "&$sSource&@CRLF&@CRLF&"Angaben","Stimmt der Zielpfad? "&$sDestination)


$aFiles = _FileListToArray($sSource)
If (Not IsArray($aFiles) and (@Error=1)) Then
    MsgBox (0,"","No Files\Folders Found.")
    Exit
EndIf


; Laufwerke Mappen
$sLwK01 = '\\vfilerXX\Ziel01\'
$sLwK02 = '\\vfilerXX\Ziel02\'
$sLwK04 = '\\vfilerXX\Ziel04\'
$sLwK20 = '\\vfilerXX\Ziel20\'


; Graphical User Interface#include <ButtonConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1_1 = GUICreate("Form1", 613, 657, 281, 114)


$K01 = GUICtrlCreateCheckbox("K01", 32, 72, 129, 33)
$K02 = GUICtrlCreateCheckbox("K02", 32, 104, 129, 25)
$K04 = GUICtrlCreateCheckbox("K04", 32, 128, 129, 25)
$K20 = GUICtrlCreateCheckbox("K20", 32, 152, 129, 25)


$K01g = GUICtrlCreateCheckbox("K01g", 176, 72, 129, 33)
$K02g = GUICtrlCreateCheckbox("K02g", 176, 104, 129, 25)
$K04g = GUICtrlCreateCheckbox("K04g", 176, 128, 129, 25)
$K20g = GUICtrlCreateCheckbox("K20g", 176, 152, 129, 25)


$start = GUICtrlCreateButton("start", 360, 168, 185, 73)
GUICtrlSetFont(-1, 15, 400, 0, "MS Sans Serif")


$check = GUICtrlCreateButton("check", 360, 272, 185, 73)
GUICtrlSetFont(-1, 15, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $start
			If GUICtrlRead($K01) = $GUI_CHECKED Then
				DriveMapAdd("S:", $sLwK01)
				_schnittstelle
			ElseIf GUICtrlRead($K01g) = $GUI_CHECKED Then
				DriveMapAdd("S:", $sLwK01 & 'g\')
				_schnittstelle


#comments-start
Hier sollte eigentlich geprüft werden, ob und welche Checkboxen aktiv sind
und im Anschluss das Laufwerk und der PFad gemappt werden.
Danach müsste die Func _schittstelle aufgerufen werden.
#comments-end


			EndIf


;		Case $GESCH
	EndSwitch
WEnd






Func schnittstelle()
;	DriveMapAdd("S:",)
	FileDelete($sDestination & '\*.jar')
	For $x=1 To UBound($aFiles,1)-1
		If FileExists($sDestination &' \' & $x) Then
			FileDelete($x)
			FileCopy($sSource & '\' & $x, $sDestination & '\' & $x,8)
		Else
			MsgBox(256,"Error","Datei "& $x &" existiert nicht.")
		EndIf
		MsgBox(256,"Name",'Dateiname: ' & $aFiles[$x])
	Next
	DriveMapDel("S:")
EndFunc

Ich lege mich erstmal aufs Ohr - vielleicht hilft das ja weiter.
Soweit schonmal Danke für das Interesse eurerseits.

Moin,

ich danke allem voran den Kollegen, die mir bei meinen letzten Problemen halfen.
Auch wenn ich zu diesen noch kein richtiges Feedback gegeben habe.

Heute habe ich leider ein neues Problem:
- Ich möchte den Checkboxen Zielpfade zuweisen.
- Bei Betätigung des Startbuttons sollen die Checkboxen geprüft werden und dann der jeweilige Zielpfad gemappt werden.

• danach soll ein FileDelete ausgeführt werden.
• im Anschluss ein FileCopy und dann soll auch schon die nächste Checkbox abgearbeitet werden.

Vorbereitungen:
- Pfad meiner Quelldateien angeben mittels Inputbox (ERLEDIGT).
- Zielpfade als Variablen hinterlegt (ERLEDIGT).
- GUI mit Checkboxen und Startbutton anlegen (ERLEDIGT).

Meine Schwierigkeit:
- Zuweisen der Laufwerksvariablen zu den Checkboxen.
- Erstellen der For-Schleife (denke mal, dass es eine ist) in der GUI um die Laufwerke zu mappen.

Wie würdet ihr hierbei vorgehen?
Kann mir einer bei der GUI-Checkbox-Variablenzuweisung helfen?

Vielen Dank an alle soweit.

Moin,

vielen Dank fürs Feedback.

Zitat von gmmg

funktioniert den dein SQL Statement in der "SQL Server Management Studio" Console?

Ja, das Statement kann ich so per Management Studio absetzen.
Dann wird mir auch korrekt ein Ergebnis geliefert.

Nicht, dass ich doch ein Problem beim Aufbau der Verbindung habe. Da stehe ich aber auch leider etwas auf dem Schlauch, wie ich dort beim Analysieren vorgehen muss. Ob und wie ich einen ErrorHandler einbaue, damit ich ausreichend Info erhalte.
Für Tipps bin ich sehr dankbar. Ansonsten muss ich mal schauen, wann ich hier weitermachen kann (Arbeit schlaucht... )

Moin,

ich habe ein (oder auch mehrere) Problem bei einer Abfrage an eine MSSQL 2008-DB.
Variablen habe ich soweit gesetzt, bzw. werden aus Dateien auslesen. Das funktioniert soweit.
Mein späteres Ziel ist es hiermit eine SQL-Update zu fahren. Jedoch erhalte ich ja nicht mal ein paar Daten.

Local $SQLstate = "SELECT lala FROM blubbablub WHERE UserID='"&$SQLuser&"' AND DBName='"&$SQLuser&"';"
Local $SQLCon = _MSSQL_Con($SQLsrv, $SQLuser, $SQLpass, $SQLdb)


If @error Then
    MsgBox(0, "ERROR", "Verbindung fehlgeschlagen")
    Exit
Else
    MsgBox(0, "ERFOLG", "Verbindung erfolgreich!")
	Local $SQLquery = _MSSQL_Query($SQLCon, $SQLstate)
	;MsgBox(256, "SQL",$SQLquery)
	_ArrayDisplay($SQLquery)
	_MSSQL_End($SQLCon)
EndIf

Irgendwie weiß ich gerade nicht mehr weiter.
Muss ich noch ein GetRecord oder so haben? Die Verbindung wird mir doch korrekt aufgebaut, sobald ich die jew. MsgBox erhalte.
Zumindest läuft es soweit, das die MsgBox "Erfolg" auftaucht.

:wacko:
Für einen Denkanstoß wäre ich sehr dankbar. Und gegoogelt habe ich leider auch schon viel zu lange.. aber ohne die Lösung gefunden, bzw. erkannt zu haben. Ich steig hier einfach nicht durch. Sorry.

Oscar
das mit dem Verzeichnis habe ich begriffen. Die Datei kann auch erfolgreich gelesen werden. Danke soweit.
Ich tippe, wie auch Kollege bobekos schon bestätigte, auf die Syntax innerhalb der ini-Datei.
Werde mal schauen, ob ich das mit der weiteren Verarbeitung hin bekomme, z.B. mit dem Ansatz von bobekos.

MfG
mid

Hi Oscar,

und danke fürs Antworten.

Hier mein Quellcode für diesen part:

#include <File.au3>
#include <Array.au3>


; ### Variablen setzen
$sSQLFile='\db.ini'
$sKdir= FileGetLongName(@ScriptDir&'\..', 1)
; ####################################


$sIniFile = $sKdir&$sSQLFile
$sRead = IniRead($sIniFile, 'Sect2', 'DRIVER', 0)
;$sRead = IniRead($sIniFile, 'Sect2', 'SERVER', 0)
ConsoleWrite($sRead & @CR)
MsgBox(0, "", $sRead)

Ergebnis Abfrage mit "DRIVER": SQL Server;SERVER=IP\HOSTNAME
Ergebnis Abfrage mit "SERVER": 0

Das mit dem Einlesen habe ich verstanden. Ich vermute, dass es am Semikolon liegt.
Und wenn bei einer INI kein "="-Zeichen hinter dem Key ist, dann wird es wohl auch nichts.
Das ist, wie auch in der db.ini zu sehen, nicht vorhanden.
Dementsprechend kann ich diese Funktionen nicht so einsetzen, oder liege ich da falsch.

Ansonsten wäre es wohl doch nicht ganz so schwer

moin,

Vorweg
ich habe folgendes Problem: bei Programmierung streikt mein Hirn einfach. Ich kann es nicht erklären, aber da ist einfach eine Blockade, sobald ich was von Array, Constant, Variablen, etc. höre.
Und trotzdem versuche ich mich durchzuschlagen. Hoffe, Ihr könnt mir etwas helfen.

Problemstellung:

Ordnerstruktur im Anhang (Datei folders.jpg & startscript.jpg)
Es gibt in einem Unterordner ein Startskript (Schnittstelle). Dieses soll eine INI-Datei im Parentdir (Programm_KundeX) auslesen. Die Werte aus "sect2,sect3,sect4" sind Verbindungsdaten für ein MSSQL-Statement. Das Statement soweit schaut auch gut aus.
Setze ich die Werte für die Verbindungsdaten händisch, dann funktioniert der Aufruf, beispielsweise

$sSQLsrv="1.3.3.7"
$sSQLuser="loginKX"
$sSQLpass="passKX"
$sSQLdb="dbKX"

Aber Ziel ist es ja, dass das Skript universell eingesetzt werden kann, daher ist es zwingend notwendig, die Daten auszulesen.
Und hier komme ich einfach nicht weiter. Ich habe auch nochmal die auszulesende Datei angehangen (db.ini).
Ich hoffe, hier kann mir irgendwie geholfen werden.

Ich danke im Voraus für euer Verständnis.

mid

Konnte das Problem lösen -> Danke an Alle für die Hilfe
Auf zum nächsten "projekt".