 |
Windows 7 : Dateien zusammen und-color: #FFFF99'>suchen
m-troeger am 01.07.2016 um 23:56 Uhr (15)
Hallo zusammen,habe gerade einen Klemmer Auf einer Server Platte zB. V:/ sind zig Artikel abgelegt, unter jeder Artikelnummer gibt es einen Ordner "Freisteller" zB. V:/Artikel/"Artikelnummer"/...*.../Freisteller/...*.../*.jpgIch möchte nun alle *.jpg vom Pfad V:/Artikel/ * /Freisteller/ * filtern/und-color: #FFFF99'>suchen und auswählen , danach zB zippenHabt Ihr einen Tip?Vielen Dank im vorraus------------------Servus,Mario www.the-skier.de
|
| In das Form Windows 7 wechseln |
|
Windows 7 : Dateien zusammen und-color: #FFFF99'>suchen
m-troeger am 04.07.2016 um 10:51 Uhr (1)
Hallo CAD-Freakle,leider funzt das so nicht------------------Servus,Mario www.the-skier.de
|
| In das Form Windows 7 wechseln |
|
Windows 7 : Dateien zusammen und-color: #FFFF99'>suchen
m-troeger am 04.07.2016 um 22:32 Uhr (15)
Hallo Rainer,das ist natürlich Idee ;-)Danke------------------Servus,Mario www.the-skier.de
|
| In das Form Windows 7 wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 22.02.2007 um 21:14 Uhr (0)
Hallo Larsich bekomm es einfach nicht hin vielleicht kanst du dir die mdb mal ansehen siehe auch erläuterung.txtwäre echt nett ------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Windows 7 : Dateien zusammen und-color: #FFFF99'>suchen
m-troeger am 05.07.2016 um 23:43 Uhr (1)
Hallo,bei WIN 10 zB im Explorer auf V:Artikel wechseln und das Suchfeldordnername:"Freisteller" UND (erweiterung:jpg)eingeben------------------Servus,Mario www.the-skier.de
|
| In das Form Windows 7 wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 21.02.2007 um 21:53 Uhr (0)
Hallo Lars,Code:strSQL = "SELECT count(Tabellenname.Feldname), Tabellenname.KL FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"funktioniert bei mir aber nicht, Fehler 3122Sie wollten eine Abfrage ausführen, die den angegebenen Ausdruck nicht als Teil der Aggregatfunktion einschließt.------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 26.02.2007 um 15:14 Uhr (0)
Hallo Lars,vielen Dank, nun hast du dir auch noch das WE versaut.Ich habe am WE leider keinen PC (Pendler).Mit dem lernen von DB und Prog. hast du ja recht, aber mir fehlt derzeit noch etwas Lektüre, und so sehr oft benötige ich DBs auch nicht.Ich werde mich nun aber mit deinem Code auseinander setzen.ich denke ich werde dadurch net dümmer.vielen Dank nochmals------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 15.02.2007 um 19:01 Uhr (0)
Danke Lars,das Funktioniert ersmal wunderbarfolgende Zeile nochmal zum besseren VerständnisCode:strSQL = "SELECT count(Tabellenname.Feldname) FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"wenn ich das so richtig verstanden habenun aber noch bei Case "1" Zitat:Wenn nur ein Datensatz gefunden wird dann soll eine VariableWERT_KL = den Wert aus dem Feld KL dieses Datensatzes der TAB2 erhaltenhier möchte ich den Wert aus Feld KL des gefundenen Datensatzes lesen------------------Servus,Mario www.the ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 20.02.2007 um 19:58 Uhr (0)
Hallo Lars,bin jetzt zu folgender Lösung gekommenCode:Option ExplicitSub test()Dim dbs As ObjectSet dbs = CurrentDbDim strSQL As StringstrSQL = "SELECT count(Tabellenname.Feldname) FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"Dim rst As ObjectSet rst = dbs.OpenRecordset(strSQL) hier kommt immer die Anzahl zurück, auch wenn nur 0 drinnenstehtDim sCountValue As StringsCountValue = rst.Fields.Item(0).ValueSelect Case sCountValue Case "0" mache dies Case "1" mache das Dim WERT_KL as S ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 14.02.2007 um 22:09 Uhr (0)
Hallo,beim verlassen des Feldes JG der TAB1 im Formularstarte ich eine VBA Procedurdort erhält die Variable WERT_JG den Wert des Feldes JG der TAB1(aktive Tabelle)WERT_JG = Me!JGnun möchte ich abtesten ob es in der TAB2 Datensätze gibt bei welchemder Wert des Feldes GEB = WERT_JG istWenn kein Datensatz gefunden wird dann eine MeldungWenn mehr als ein Datensatz gefunden wird dann eine andere MeldungWenn nur ein Datensatz gefunden wird dann soll eine VariableWERT_KL = den Wert aus dem Feld KL dieses Datensat ...
|
| In das Form Access wechseln |
|
AutoLisp : Block und-color: #FFFF99'>suchen
m-troeger am 19.01.2003 um 23:36 Uhr (0)
Hallo Florian, ich hab mir auch so eine Routine gebastelt, welche die Blöcke in den Kontrollpunkten von Polylinien sucht und ... , jedoch hab auch ich keine Lösung für dein Problem gefunden. Man müßte vom Endpkt der Pl einen Suchkreis definieren können zB 1mm , wenn dann kein Block gefunden wurde, den Kreis wiederum um 1mm erhöhen. Aber keine Ahnung wie das funzt. Es gibt aber einen Vermessungsaufsatz auf ACAD der das kann, es Muß also möglich sein. Im Aufsatz GeoCAD von der Fa. maraite wird aufgefordert d ...
|
| In das Form AutoLisp wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 19.03.2007 um 22:43 Uhr (0)
Hallo,ich habe nun im Formular FRM_STARTER noc etwas geändert, um mir ein recordset zu sparenCode alt:Code: in die tabelle klasse schauen, ob das geburtsjahr irgendwo in die definition reinpasstDim dbs As ObjectSet dbs = CurrentDbDim strSQL As StringstrSQL = "SELECT count(klasse.jg_von) " & _ "FROM klasse " & _ "WHERE klasse.jg_von = " & sJahrgang & " " & _ "AND klasse.jg_bis = " & sJahrgang & " " & _ "AND klasse.sex = " & sGeschlecht & ";"Dim rst As ObjectSet rst = dbs.OpenRecordset(strSQL ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 22.02.2007 um 23:11 Uhr (0)
Hallo Lars,ich habs nun fast Formular KLASSE funktioniert jetzt neuer CodeCode: in VBA Formular FRM_KLASSEPrivate Sub BTN_JGBERECHNEN_Click()Dim JAHR, ALTERJ, ALTERAE As VariantDim MEID As SingleMEID = Me!IDJAHR = FRM_KLASSE_TXT_JAHR.ValueALTERJ = FRM_KLASSE_TXT_ALTERJ.ValueALTERAE = FRM_KLASSE_TXT_ALTERAE.ValueIf ALTERAE "" And ALTERJ "" And JAHR "" ThenALTERJ = JAHR - ALTERJALTERAE = JAHR - ALTERAEDim s1, s2 As Strings1 = "Update KLASSE SET JG_von = " & ALTERJ & " WHERE ID= " & MEID & " "s2 = "Up ...
|
| In das Form Access wechseln |
