Dragan

Hallo,

Ich habe folgendes Problem. Undzwar wollen wir in unserer Firma viele Access Datenbanken auf den SQL Server legen. Das heisst ich müsste bei allen Clients diverse Syten bzw. User DSNs einrichten. Habe ich eine Möglich keit das z.B. über das Logon Skript des Users zu machen. Oder hat man andere Möglichkeiten wie man das automatisieren kann.

Vielen Dank im Voraus

Also ich hab mal ne Frage…

Kann man bei den Modulen unter Extras | Verweise, die Hacken für die Auswahl der Bibliotheken automatisch irgendwie setzen.

Denn so tritt bei uns in der Firma öfter das Problem auf, das ich dann immer bei allen Leuten die Hacken für die Bibliotheksauswahl manuell setzen muss…

Kann man das irgendwie per Code automatisieren?

Hallo,

Mal wieder ne Frage

Kann ich folgendes über ein Makro oder VBA Code lösen...:

Ich habe z.B. die Datei c:\test.txt

1. diese will ich als erstes mal kopieren = c:\testneu.txt

2. und dann will ich die Datei wieder löschen

Geht das über VBA???

ACCESS97

Danke

Hallo,

Ich würde gerne eine BatchDatei über ein Makro aufrufen bloss soll der User garnicht mitbekommen das das Makro die Batch aufruft...bzw. die Eingabeaufforderung soll nicht mehr aufpoppen...

Kann man die Eingabeaufforderung irgendwie minimiert starten???

Geht das irgendwie

Danke

Hier den Quellcode habe ich gefunden

dabei zeigt alle User an die die DB geöffnet haben

Bloß hat er irgendwie an manchen Stellen ein Problem beim Kompilieren unter Access97 bei 2000 gehts....

Er bringt irgend so nen Fehler Objektbibliothek nicht gefunden

Private Sub UpdateBtn_Click()

Me.LoggedOn.RowSource = WhosOn()

End Sub

'-------------------------------------------------------------------------------------

' Subject : WhosOn()

' Purpose : Will read *.LDB file and read who's currently

' logged on and their station name.

'

' The LDB file has a 64 byte record.

'

' The station name starts at byte 1 and is null

' terminated.

'

' Log-in names start at the 33rd byte and are

' also null terminated.

'

' I had to change the way the file was accessed

' because the Input() function did not return

' nulls, so there was no way to see where the

' names ended.

'-------------------------------------------------------------------------------------

Private Function WhosOn() As String

On Error GoTo Err_WhosOn

Dim iLDBFile As Integer, iStart As Integer

Dim iLOF As Integer, I As Integer

Dim sPath As String, X As String

Dim sLogStr As String, sLogins As String

Dim sMach As String, sUser As String

Dim rUser As UserRec ' Defined in General

Dim dbCurrent As Database

' Get Path of current database. Should substitute this code

' for an attached table path in a multi-user environment.

Set dbCurrent = DBEngine.Workspaces(0).Databases(0)

sPath = dbCurrent.Name

dbCurrent.Close

' Iterate thru dbCurrent.LDB file for login names.

sPath = Left(sPath, InStr(1, sPath, ".")) + "LDB"

' Test for valid file, else Error

X = Dir(sPath)

iStart = 1

iLDBFile = FreeFile

Open sPath For Binary Access Read Shared As iLDBFile

iLOF = LOF(iLDBFile)

Do While Not EOF(iLDBFile)

Get iLDBFile, , rUser

With rUser

I = 1

sMach = ""

While .bMach(I) <> 0

sMach = sMach & Chr(.bMach(I))

I = I + 1

Wend

I = 1

sUser = ""

While .bUser(I) <> 0

sUser = sUser & Chr(.bUser(I))

I = I + 1

Wend

End With

sLogStr = sMach & " -- " & sUser

If InStr(sLogins, sLogStr) = 0 Then

sLogins = sLogins & sLogStr & ";"

End If

iStart = iStart + 64 'increment to next record offset

Loop

Close iLDBFile

WhosOn = sLogins

Exit_WhosOn:

Exit Function

Err_WhosOn:

If Err = 68 Then

MsgBox "Couldn't populate the list", 48, "No LDB File"

Else

MsgBox "Error: " & Err.Number & vbCrLf & Err.Description

Close iLDBFile

End If

Resume Exit_WhosOn

End Function

Naja vielleicht hat noch jemand Tipps ob man das machen kann

mit der Protokollierung der Benutzer die Zugriff haben auf die Datenbank

Hallo,

Mich würde mal interessieren, ob man irgendwie auslesen kann welche Benutzer alles in einer Datenbank drin waren...

Kann man da irgendwie ein Protokoll generieren...

Wäre nicht schlecht wenn so was möglich wäre...

Danke

Gruss

Zoran

Hallo,

Ich habe ein Problem mit dem Active Barcode...

Ich soll ein Etikett erstellen auf dem der Barcode drauf ist...

das funktioniert auch so weit...

Aber da mein etikett sehr schmal ist...brauche ich ne Möglichkeit den ActiveBarcode hochkant(senkrecht) auszurichten

Gibt es da ne Möglichkeit???

Danke

Was ist hier falsch???

Me.StreifenerfassungSubF.Controls.Item(1)

= "Warentraeger_breit"

Ich möchte aus einem SubFRM den Wert einer Spalte auslesen,

die Spalte ist die 2 in der Datenblattansicht des

Formulars und ist als Text formatiert...

Danke

Also folgendes Problem:

Habe folgendes Formular (Datenblattansicht):

Streifennr || Reihenfolge || Bericht || Artikelnr

1 1 Berichtgross 00050

1 2 Berichtklein 00060

Nun habe ich noch 2 Berichte (Berichtgross und BerichtKlein) Hier sollen Artikeldetail angezeigt werden die abhängig sind von der Artikelnr…

Es sollen folgende Punkte passieren:

1. Berichtgross soll geöffnet werden

2. Darin sollen Artikeldetails zum Artikel 00050 angezeigt werden

3. Anschließen soll der zweite Bericht Berichtklein geöffnet

4. Zum Schluss soll in diesem Bericht nur die Details zu 00060 angezeigt werden

Wie kann ich das ganze am besten lösen

Danke

Hat noch jemand irgendwelche Tipps...

Ich bekomme es nicht hin...

Irgendwie klappt das nicht ganz

Hier noch die Daten

Formular1 = Schonach Textfeld = zeitraumbeginn

Formular2 = S_BitteWarten Textfeld = Text2

Muss ich den Code dann beim öffnen von Formular2 einfügen, oder

Hallo,

Ich habe zwei Formulare

Formular1 und Formular2 und habe in beiden Formuaren jeweils ein Textfeld

Formular1 /// Textfeld1 = Test1

Formular2 /// Textfeld1 =

Nun möchte ich den Inhalt auch in das andere Textfeld eintragen wie mache ich das am einfachsten

Formular1 ist geöffnet und dann anschließend öffnet sich Formular2

Danke im Voraus...

Hallo,

Also ich habe mal wieder ein Problem, vielleicht kann mir jemand helfen...

**********

Function GetKalenderwoche(tdate As Date) As Integer

GetKalenderwoche = DatePart("ww", tdate, vbMonday)

End Function

**********

Kann ich die aufgeführte Funktion auch irgendwie für die Monatsumwandlung verwenden

Wie müsste ich das umschreiben???

Ich habe es zwar mit folgendem versucht:

Format([agistende];"mm")

Aber da ist das Problem, das er mir den Inhalt der rauskommt als Text formatiert

Aber ich bräuchte es als Integer sowie oben, denn anschließend will ich folgendes anwenden:

format(datum()"mm")-1

Und wenn ich es als Text hab macht er mir immer folgendes daraus

format(datum()"ww")-"1"

Vielen Dank für Ihre Bemühungen

Danke du hast recht...

Aber ich brauch das noch ein bisschen anderst...

Und zwar habe ich ne Tabelle

KW Wert

21 10

22 22

23 30

Nehmen wir an die aktuelle KW ist 23

Möchte ich das er mir nur die vorletzte in der Abfrage anzeigt

Da bräuchte man ne Funktion wie diese Datum()-1

Aber mein Problem ist ich brauch das unbedingt mit KWs und nicht mit nem normalen

Datumswert

Wäre sehr froh über weiter Hilfestellungen...

Also folgende Sachlage…

Ich habe zwei Tabellen:

Tabelle1

KW Wert

1 10

2 20

3 30

4 40

5 50

6 60

Tabelle2

KW Wert

1 10

2 20

3 30

4 40

5 50

Also hierbei geht es um Kalenderwochen…die ich in der 2 Tabelle temporär aktualisieren will

Ich will die letzte KW aus Tabelle 2 löschen (Löschabfrage)

Und dann die letzten 2 KWs von der Tabelle1 an die Tabelle2 anfügen….

Mit dem normalen Datum gibt es ne Funktion ( Datum()-2 ) in Access aber für KWs habe ich noch nichts gefunden

Kann mir jemand helfen???

Danke

Na werd ich mal den T Service anrufen...

Hoffentlich können die mir helfen...

Den habe es vorhin mal getestet und funkt immernoch nicht...

Also gestern gab es bei uns ein Gewitter und seitdem hab ich ständig einen

Fehlerstatus auf meinem DSL Modem... Die Sync Diode leuchtet ständig rot

Verkabelt ist aufjedenfall alles richtig denn hab ja das DSL schon länger...

Was kann ich bzw. was muss ich tun???

Danke

Hallo,

ich habe folgendes Problem, ich habe ein Access Datenbank

und darin habe ich mehrere Kreuztabellenabfragen. Will ich

einen Datenimport nach Excel2002 machen geht es mit allen

Kreuztabellenabfragen ohne Probleme.

Will ich den Datenimport jedoch in Excel97 durchführen

geht es nicht mit jeder Kreuztabellenabfrage.

An was kann es liegen?

Und was kann ich dagegen tun?

Danke

Hallo,

Ich habe eine Excel Datei, und darin habe ich 3 Registerlemente

Beispiel 1 und 2 und 3

Gibt es ne Möglichkeit das ich beim öffnen der Datei erst eine Auswahl bekomme

welche Register angezeigt werden soll...

Oder ein Formular mit 3 Buttons

1 = Nachdem Klicken wird das Register 1 angezeigt

2 = Nachdem Klicken wird das Register 2angezeigt

3 = Nachdem Klicken wird das Register 3angezeigt

Wie könnte ich sowas steuern bzw. erstellen

Danke

Hallo,

Ich möchte in einer Tabelle alle Punkte durch Kommas ersetzen...

Meine Tabele sieht so aus....

7.50

8.00

9.45

7.89

ich will das sie so aussieht:

7,50

8,00

9,45

7,89

Danke im Voraus...

Folgendes Problem:

Also ich habe z.B. zwei Kombinationsfelder in einem Formular

Gerätetyp = PC, Monitor, Drucker, Switch

Modell = DellOptiplex, 3Com3000 Switch, Dell TFT, Dell17“, Siemens P3

Also ich möchte es so einrichten das wenn ich oben z.B PC auswähle unten nur DellOptiplex und Siemens P3 im Kombofeld angezeigt wird…

Wie kann ich das am besten lösen

Danke im Voraus…

Also es hört sich so an als ob die Geräusche vom Netzteil kommen...zu 99%

Also es ist folgende Konfiguration:

- AMD Athlon 1GHz

- 512MB Arbeitsspeicher

- Grosse Festplatte

- Geforce Grafikkarte 64MB

weitere Details kann ich jetzt aktuell nicht aus dem Kopf sagen...

Mit was für nem Preis muss man den rechnen...für ein Netzteil

Danke im Voraus

Gruss

Dragan

Hallo,

Mein PC macht zur Zeit komische Geräusche wenn ich ihn einschalte,

wenn ich dann mal ein bisschen draufhaue auf das Gehäuse geht das Geräusch wieder weg...Ich vermute das der Lüfter im Netzteil nicht mehr 100%ig läuft...

bzw dieser die Geräusche verursacht...

Jetzt meine Frage...

Auf was muss ich achten, wenn ich mir ein neues Netzteil anschaffen will...

Danke im Voraus

Gruss

Dragan

Kann man irgendwo prüfen wieviel HauptSpeicher-Module sich in einem

PC befinden

Ohne das ich jeden PC aufschrauben muss...

Danke für eure Bemühungen

Gruss

Dragan