vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
dubioses Problem- Fehler woanders? 
Autor: moelle
Datum: 17.01.02 09:17

Hi,

das Problem scheint doch etwas anders gelagert zu sein, was mir allerdings noch mehr zu denken gibt.

Anscheinend hängt sich das Tool an einer anderen Stelle auf: Also ich lese aus einer Lsitbox einen String aus (Datum/Uhrzeit) den ich mir anders wieder zusammensetze, um diesen so aufzubereiten das Access SQL damit was anfangen kann.

Nun hängt sich Access anscheinend beim Aufruf von "strDay = Left(selectedDate, 2)"
auf und meldet sich mit "Projekt oder Bibliothek nicht auffindbar".

Hat irgendwer eine Idee??? Also auf meiner Kiste läuft es Problemlos. Auf Grund räumlicher Trennung ist es leider nicht möglich, mir das bei ihm genau anzuschauen...

CU
Mölle

Hier mal mein Code:

Private Sub Start_Click()
On Error GoTo Err_Start
Dim selectedDate As String
Dim strDay As Integer
Dim strMonth As Integer
Dim strYear As Integer
Dim strHour As Integer
Dim strMinute As Integer
Dim strSecond As Integer
Dim strSQL_Date As String

selectedDate = Me.List_QUEUE.Value
'Tag
strDay = Left(selectedDate, 2)

'Monat
strMonth = Mid(selectedDate, 4, 2)
strYear = Mid(selectedDate, 7, 4)
strHour = Mid(selectedDate, 12, 2)
strMinute = Mid(selectedDate, 15, 2)
strSecond = Mid(selectedDate, 18, 2)
strSQL_Date = "#" & strMonth & "/" & strDay & "/" & strYear & " " & strHour & ":" & strMinute & ":" & strSecond & "#"
'MsgBox strSQL

Call getRecordSet(strSQL_Date)
Err_Start:
If Err.Number <> 0 Then
Select Case Err.Number
Case 94: MsgBox "Sie müssen zunächst einen Datensatz auswählen!"
Case Else: MsgBox "Es ist ein Fehler aufgetreten: " & Err.Number & " " & Err.Description
End Select
End If
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
ListViewControl einbinden59moelle17.01.02 07:26
dubioses Problem- Fehler woanders?37moelle17.01.02 09:17
Re: dubioses Problem- Fehler woanders?37immelmann17.01.02 11:43
Re: dubioses Problem- Fehler woanders?31moelle18.01.02 15:32

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel