vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Zippen wie die Profis!  
 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

VB & Datenbanken
Re: PRoblem beim rechnen??!! 
Autor: MicMarx
Datum: 07.11.04 17:59
HAb mir das mal angekuckt, aber dann müsste es doch auch so gehen: 

Rs.Open "Select SUM(Einnahme) As Summe From Kassenbuch Where Monat = 'Feb'", _
  Cn, adOpenDynamic, adLockOptimistic
Rs2.Open "Select * From Kassenbestände Where Monat = 'Feb'", Cn, adOpenDynamic, _
adLockOptimistic
If IsNull(Rs2.Fields("Summe").Value) Then
        Rs2.Fields("Summe").Value = 0
Else
End If
FebE = Rs.Fields("Summe").Value
Rs.Close
Rs2.Close
 
Rs.Open "Select SUM(Ausgabe) As Summe From Kassenbuch Where Monat = 'Feb'", Cn, _
  adOpenDynamic, adLockOptimistic
Rs2.Open "Select * From Kassenbestände Where Monat = 'Feb'", Cn, adOpenDynamic, _
adLockOptimistic
If IsNull(Rs2.Fields("Summe").Value) Then
        Rs2.Fields("Summe").Value = 0
Else
End If
FebA = Rs.Fields("Summe").Value
Rs.Close
Rs2.Close
 
FebED = CDbl(FebE)
FebAD = CDbl(FebA)
Feb = FebED - FebAD
Aber hier sagt er mir dannin der Zeile: 
If IsNull(Rs2.Fields("Summe").Value) Then
Ein Objekt, das dem angeforderten Namen oder dem angeforderten Ordinalverweis
entspricht, konnte nicht gefunden werden.

Wieso geht das so nicht??
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
PRoblem beim rechnen??!!1.240MicMarx07.11.04 16:01
Re: PRoblem beim rechnen??!!727wincnc07.11.04 16:26
Re: PRoblem beim rechnen??!!768MicMarx07.11.04 17:59
Re: PRoblem beim rechnen??!!696Roger10.11.04 15:26
Re: PRoblem beim rechnen??!!815MicMarx10.11.04 18:05

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