Top-Themen

Aktuelle Themen (A bis Z)

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

VBScript - Wenn Bedingung erfüllt ist den Text farbig färben

Frage Entwicklung Visual Studio

Mitglied: ElricFries

ElricFries (Level 1) - Jetzt verbinden

27.06.2013, aktualisiert 11:42 Uhr, 2378 Aufrufe, 6 Kommentare, 2 Danke

Hallo Leute,

ich weiß nicht, ob dieser Bereich richtig ist, aber ich bin davon ausgegangen

Mein Problem ist dieses, ich bin soweit neu beim VB Script, aber habe C# und VBA schon ein wenig programmiert.

Nun habe ich angefangen zu Scripten, aber muss nun einen Text farbig machen, wenn eine bestimmte Bedingung erfüllt ist.

Ich brauche nur den "Befehl" um zu färben.

Nehmen wir an:

If wochentag(2) = mittwoch then
document.write("Ja"& "<br>")
Else
document.write("Nein"& "<br>")
End If

Wie mache ich das "Ja" rot, wenns zutrifft?

Im Internet finde ich nichts was mir weiter helfen kann..

Danke und Freundliche Grüße,

Elric
Mitglied: colinardo
27.06.2013, aktualisiert um 11:31 Uhr
Hallo Elric,
denke dein Zieldokument ist HTML, dann geht das so:
01.
Document.write ('<span style="color:red>Ja</span><br />')
Grüße Uwe
Bitte warten ..
Mitglied: ElricFries
27.06.2013, aktualisiert um 11:41 Uhr
nun stellt sich mir die Frage, wie ich auf die ausgegebene Zahl kommen soll

<!DOCTYPE html>
<html>
<body>

<script type="text/vbscript">


dim wochentag(6)
dim zahl

wochentag(0) ="montag"
wochentag(1) ="dienstag"
wochentag(2) ="mittwoch"
wochentag(3) ="donnerstag"
wochentag(4) ="freitag"
wochentag(5) ="samstag"
wochentag(6) ="sonntag"

For zahl = 0 to 10
If zahl mod 2 then
document.write("<span style=color:red></span><br>")
for i = 0 to 6
document.write("Es ist heute: "& wochentag(i) &"<br>")
Next
else document.write("Ungültig" & "<br>")
end if
Next





</script>
</body>
</html>



Mir soll nun die zahl in rot angezeigt werden, aber wenn ich da nur "zahl" eingebe, kommt nur "zahl" in rot
Bitte warten ..
Mitglied: colinardo
27.06.2013 um 11:49 Uhr
meinst du das so ?
01.
document.write("<span style=color:red>" & zahl & "</span><br>")
Übrigens, es gibt in VBA ein Objekt mit dem Namen Date mit dem man den Wochentag abfragen kann!
Bitte warten ..
Mitglied: ElricFries
27.06.2013 um 11:50 Uhr
Das meinte ich danke
Ja davon wusste ich, dass hier grad, war nurn kleiner Anfang im Skripten Mit dem Date Objekt setz ich mich gleich auseinander
Bitte warten ..
Mitglied: colinardo
27.06.2013, aktualisiert um 15:18 Uhr
Zum reagieren auf die unterschiedlichen Wochentage kann folgender Code verwendet werden:
01.
wd = Weekday(Date) 
02.
Select Case wd 
03.
	Case vbMonday 
04.
		'Montag 
05.
	Case vbTuesday 
06.
		'Dienstag 
07.
	Case vbWednesday 
08.
		'Mittwoch 
09.
	Case vbThursday 
10.
		'Donnerstag 
11.
	Case vbFriday 
12.
		'Freitag 
13.
	Case vbSaturday 
14.
		'Samstag 
15.
	Case vbSunday 
16.
		'Sonntag 
17.
End Select
Bitte warten ..
Mitglied: bastla
27.06.2013, aktualisiert um 20:16 Uhr
... wobei es ja ggf auch noch die Funktion WeekdayName() gäbe ...

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Excel - Spalte löschen, wenn die Bedingung erfüllt ist
gelöst Frage von wingetMicrosoft Office4 Kommentare

Hallo zusammen, wer kann mir mit einem Makro für folgendes Problem helfen. 1.Beliebige Zeilen 2.Beliebige Spalten 3.Mehrere sheets (Blätter) ...

Microsoft Office
Zeilen in Excel einfügen wenn eine Bedingung erfüllt ist
gelöst Frage von geosulfMicrosoft Office8 Kommentare

Hallo ich möchte ein Problem in Excel lösen habe ein zwei Tägiges Seminar Excel VBA Einsteiger besucht und nun ...

Batch & Shell
For-Schleife Bedingung "nicht erfüllt" abfragen
Frage von BatchNeulingBatch & Shell8 Kommentare

Hallo zusammen, dieses Forum hat mir schon des öteren weiter geholfen. Leider finde ich auch nach intensiver Suche noch ...

Microsoft Office
EXCEL ganze Zeile farblich markieren, wenn Bedingung erfüllt
gelöst Frage von dumbledorexxlMicrosoft Office2 Kommentare

Hallo und guten morgen, habe folgendes Problem und bekomme es nicht gelöst. in dieser Tabelle soll die ganze Zeile ...

Neue Wissensbeiträge
Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 6 StundenViren und Trojaner1 Kommentar

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Router & Routing

Lets Encrypt kommt auf die FritzBox

Information von bitcoin vor 10 StundenRouter & Routing

In der neuesten Labor-Version der FB7490 integriert AVM unter anderem einen Let's Encrypt Client für Zugriffe auf das Webinterface ...

Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 3 TagenInternet17 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Webbrowser

Bugfix für Firefox Quantum released - Installation erfolgt teilweise nicht automatisch!

Erfahrungsbericht von Volchy vor 4 TagenWebbrowser8 Kommentare

Hallo zusammen, gem. dem Artike von heise online wurde mit VersionFirefox 57.0.1 sicherheitsrelevante Bugs behoben. Entgegen der aktuellen Veröffentlichung ...

Heiß diskutierte Inhalte
Batch & Shell
Trusted Sites für alle User auf dem PC einpflegen
Frage von xXTaKuZaXxBatch & Shell12 Kommentare

Aufgabestellung: Es sollen auf 1 PC (bzw. mehreren PCs) vertrauenswürdige Sites per Powershell eingetragen werden, die für alle User ...

Voice over IP
Telefonstörung - Ortsrufnummern kein Verbindungsaufbau
Frage von Windows10GegnerVoice over IP10 Kommentare

Hallo, sowohl bei uns als auch beim Opa ist es über VoIP nicht möglich Ortsrufnummern anzurufen. Es kommt nach ...

Vmware
DOS 6.22 in VMWare mit CD-ROM
gelöst Frage von hesperVmware8 Kommentare

Hallo zusammen! Ich hab ein saublödes Problem. Es ist eine VMWare mit DOS 6.22 zu erstellen auf dem ein ...

Cloud-Dienste
PIM als SaaS Nutzungsgebühr
Frage von vanTastCloud-Dienste8 Kommentare

Moin, wir haben uns ein PIM (Product Information Management) nach unseren Ansprüchen für viel Geld als SaaS-Lösung bauen lassen. ...