Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Vbs - Ergebnis einer Rechnung soll minimal 0 sein?

Frage Entwicklung Batch & Shell

Mitglied: AlbertMinrich

AlbertMinrich (Level 2) - Jetzt verbinden

09.02.2012, aktualisiert 14:49 Uhr, 2760 Aufrufe, 4 Kommentare

Hallo,

kann man als Ergebnis einer Rechnung 0 ausgeben lassen, wenn das Ergebnis kleiner als 0 wäre.
Beispiel:
wscript.echo 5-3 soll 2 ergeben
wscript.echo 3-5 soll 0 ergeben

Ich kanns mit einer function lösen:

01.
wscript.echo minimalergebnis0(3 - 5) 
02.
function minimalergebnis0(rechnung) 
03.
   if rechnung < 0 then 
04.
      minimalergebnis0 = 0 
05.
   else 
06.
      minimalergebnis0 = rechnung 
07.
   end if 
08.
end function
Aber vielleicht gibt´s ja auch eine vordefinierte Funktion oder eine elegantere Lösung.


Danke
AlbMin
Mitglied: bastla
09.02.2012 um 15:01 Uhr
Hallo AlbertMinrich!

Du könntest es zwar so erreichen:
WScript.Echo -((3-5)>=0)*(3-5)
aber "elegant" wäre der letzte Begriff, der mir dafür einfiele ...

Grüße
bastla
Bitte warten ..
Mitglied: AlbertMinrich
09.02.2012 um 20:45 Uhr
Zitat von bastla:
Hallo AlbertMinrich!

Du könntest es zwar so erreichen:
WScript.Echo -((3-5)>=0)*(3-5) 
> 
aber "elegant" wäre der letzte Begriff, der mir dafür einfiele ...

Also bitte, wenn das nicht elegant ist?!?

Super, danke.

Gruß
AlbMin
Bitte warten ..
Mitglied: Biber
09.02.2012 um 22:13 Uhr
Hmmm, ihr Grazien,


bei mir ergibt es aber.
01.
'Script d:\temp\testmin0.vbs 
02.
a=Wscript.arguments(0) : b=Wscript.arguments(1) 
03.
Wscript.echo "In  a:" , a, " b:",  b , "Ergebnis:" , -((a-b)>=0)*(a-b) 
rumgetestet...
d:\temp>cscript //nologo d:\temp\testmin0.vbs 5 3 
In  a: 5  b: 3 Ergebnis: 2 
 
d:\temp>cscript //nologo d:\temp\testmin0.vbs 3 5 
In  a: 3  b: 5 Ergebnis: -0 
 
d:\temp>cscript //nologo d:\temp\testmin0.vbs 3 3 
In  a: 3  b: 3 Ergebnis: 0
Ist die (-0) denn gewollt?

Grüße
Biber
Bitte warten ..
Mitglied: bastla
09.02.2012 um 22:22 Uhr
@Biber
Ist die (-0) denn gewollt?
Wohl nicht (könnte aber das Gegenstück zur "schwarzen Null" sein ) - dann eben
Wscript.echo "In  a:" , a, " b:",  b , "Ergebnis:" , ((a-b)>=0)*-(a-b)
Grüße
bastla
Bitte warten ..
Neuester Wissensbeitrag
Exchange Server

WSUS bietet CU22 für Exchange 2007 SP3 nicht an. EOL Exchange 2007

Tipp von DerWoWusste zum Thema Exchange Server ...

Ähnliche Inhalte
VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

Batch & Shell
Eventlog Druckjobs mit VBS auslesen (4)

Frage von joni2000de zum Thema Batch & Shell ...

VB for Applications
VBS Script zum versenden mehrerer Verknüpfungen zu Dateien per Lotus Notes

Frage von Sentinel87 zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Exchange Server
Test-ActiveSyncConnectivity Error nach neuem Zertifikat (17)

Frage von Driphex zum Thema Exchange Server ...

Batch & Shell
gelöst Batch xls nach aktuellem Datum auslesen und email senden (14)

Frage von michi-ffm zum Thema Batch & Shell ...

Backup
Datensicherung ARCHIV (12)

Frage von fautec56 zum Thema Backup ...