Verwandte Themen

Kiwitastisch
13.05.2020, 13:18
Mit Bildern
Excel VBA UserForm "Passwort ändern" funktioniert nicht?

Ich komme echt nicht weiter bei so einem einfachen Code! :(

Das Problem ist, dass die UserForm einmal funktioniert, aber beim zweiten Mal sagt er "Das Passwort ist nicht korrekt", obwohl es das eigentlich sein müsste. Per Direktbereich abgefragt ergibt sich dann immer, dass das Passwort auf "" steht. Findet jemand im Code den Fehler?

PS: "NeuesPasswort1" steht für die obere, "NeuesPasswort2" für die untere Reihe.

Option Explicit

Sub CheckBoxAltesPasswort_Click()
  If CheckBoxAltesPasswort.Value = True Then
    TextBoxAltesPasswort.PasswordChar = ""
    Else
      TextBoxAltesPasswort.PasswordChar = "*"
  End If
End Sub

Sub CheckBoxNeuesPasswort1_Click()
  If CheckBoxNeuesPasswort1.Value = True Then
    TextBoxNeuesPasswort1.PasswordChar = ""
    Else
      TextBoxNeuesPasswort1.PasswordChar = "*"
  End If
End Sub

Sub CheckBoxNeuesPasswort2_Click()
  If CheckBoxNeuesPasswort2.Value = True Then
    TextBoxNeuesPasswort2.PasswordChar = ""
    Else
      TextBoxNeuesPasswort2.PasswordChar = "*"
  End If
End Sub

Sub CommandButtonAbbrechen_Click()
  Me.Hide
End Sub

Sub CommandButtonSpeichern_Click()
  If TextBoxAltesPasswort.Value <> AltesPasswort Then
    MsgBox ("Das Passwort ist nicht korrekt.")
    Exit Sub
  End If
  If TextBoxNeuesPasswort1.Value <> TextBoxNeuesPasswort2.Value Then
    MsgBox ("Die Passwörter stimmen nicht überein.")
    Exit Sub
  End If
  If Len(TextBoxNeuesPasswort1.Value) < 5 Then
    MsgBox ("Bitte wählen Sie ein Passwort mit mindestens 5 Zeichen.")
    Exit Sub
  End If
  NeuesPasswort = TextBoxNeuesPasswort1.Value
  Passwort = NeuesPasswort
  Me.Hide
End Sub

Sub UserForm_Activate()
  AltesPasswort = Passwort
End Sub
Bild zum Beitrag
Computer, Microsoft Excel, programmieren, VBA, passwort-aendern, UserForm
1 Antwort
INeedHelp275
12.05.2020, 16:40
Array in BlueJ aufrücken lassen?

Ich habe einen Array mit CDs (50 Plätze), die mit Titel, Autor und Erscheinungsjahr gespeichert werden, erstellt. Jetzt wollte ich die Funktion einbauen, dass man auch CDs löschen kann. Das funktioniert auch, nur dass die übrig gebliebenen CDs, die "über" der Gelöschten sind, nicht nach rücken. Also wenn die Erste CD gelöscht wird, soll die Cd auf dem zweiten Platz auf den Ersten rücken.

Habt ihr da eine Idee, wie ich das machen kann?

Vielen Dank schon mal im Voraus. :)

public void cdLoeschen (String pTitel)
   {
       boolean raus = false;
       if(cdanzahl != 0)
       {
           for(int i=0;i<cdanzahl;i++)
           {
               if(cdSammlung[i].gibTitel()== pTitel)
               {
                   cdSammlung[i] = null;
                   raus = true;
               }
               cdanzahl --;
           }
       }
       else
       {
           System.out.println("Das CD-Regal ist leer, Sie koennen nichts loeschen!");
       }
       if(raus = true)
       {
           System.out.println("\"" + pTitel + "\" wurde geloescht!");
       }
       else
       {
           System.out.println("\"" + pTitel + "\" konnte nicht gefunden werden!");
       }
   }
Computer, Schule, programmieren, Java, BlueJ, Informatik
3 Antworten
INeedHelp275
12.05.2020, 14:13
In BlueJ Array durchsuchen?

Ich möchte eine Array-Liste mit CDs, die mit Titel, Autor und Erscheinungsjahr gespeichert werden, durchsuchen (mit dem Erscheinungsjahr). Das Programm soll unabhängig vom Inhalt ablaufen. Es soll also nicht ein gespeichertes Erscheinungsjahr im Programm benutz werde. Ich habe schon etwas programmiert und bekomme auch keine Fehlermeldung. Allerdings wird mir in der Konsole dann garnichts mehr angezeigt.

Vielen Dank schon mal im Voraus. :)

public void suchenMitErscheinungsjahr(int pErscheinungsjahr)

   {

       boolean gefunden = false;

       if (cdanzahl !=0)

       {

           for (int i=1; i<cdanzahl; i++)

           {

               if (cdSammlung[i].equals(pErscheinungsjahr))

               {

                   System.out.println(cdSammlung[i].gibTitel());

                   System.out.println(cdSammlung[i].gibInterpret());

                   System.out.println(cdSammlung[i].gibErscheinungsjahr());   

                   gefunden = true;

               }

           }

       }

       else

       {

           System.out.println("Das CD-Regal ist leer!");

       }

       

       if (gefunden = false)

       {

           System.out.println("Eine CD mit diesem Erscheinungsjahr existiert nicht im Regal!");

       }

   }

Computer, Schule, programmieren, Java, BlueJ, Informatik
1 Antwort
INeedHelp275
12.05.2020, 13:01
Array-Liste alphabetisch sortieren in BlueJ?

Ich möchte eine Array-Liste mit CDs, die mit Titel, Autor und Erscheinungsjahr gespeichert werden, alphabetisch (nach Titel) sortieren (das Programm soll unabhängig vom Inhalt ablaufen. Es soll also nicht ein gespeicherter Titel im Programm benutz werden). In der if-Anweisung wird mir beim > eine Fehlermeldung angezeigt, was ja sinnvoll ist, da ein String ja nicht > als ein andere sein kann. Ich weiß allerdings nicht, was ich stattdessen schreiben soll.

Vielen Dank schonmal im Voraus.

public void sortiernNachTitel()

   {

       cd temp;

       for(int i=1; i<cdanzahl; i++)

       {

           for(int j=0; j<cdanzahl-i; j++)

           {

               if(cdSammlung[j].gibTitel()>cdSammlung[j+1].gibTitel())

               {

                   temp=cdSammlung[j];

                   cdSammlung[j]=cdSammlung[j+1];

                   cdSammlung[j+1]=temp;

               }

           }

       }

       for( int a=0; a<cdanzahl; a++)

       {

           System.out.println(cdSammlung[a].gibTitel());

           System.out.println(cdSammlung[a].gibInterpret());

           System.out.println(cdSammlung[a].gibErscheinungsjahr());

       }

   }

Computer, Schule, programmieren, Java, Array, BlueJ, Informatik
2 Antworten
Fibunacciii
11.05.2020, 16:28
Woran erkennt man einen guten Entwickler und woher weiß ich, ob ich dazu in der Lage bin?

Schönen guten Tag,

ich habe vor 3 Jahren privat angefangen mir selbst programmieren beizubringen. In dieser Zeit, habe ich allerlei Programme erstellt. Angefangen von größeren, bis hin zu kleineren. Dabei kam ich mit

  • Java(Spring)
  • C#
  • PHP
  • HTML und CSS
  • SQL

in Berührung.

In letzter Zeit keimt aber das Verlangen in mir auf, zu erfahren, wo ich mit meiner Leistung stehe. Ich bin ein Mensch, der in dem was er tut, gut sein will. Das bedeutet, ich habe eine hohe Erwartungshaltung an mich selbst. Der Programmiersektor ist ein breit gefächerter Bereich und mir ist bewusst, dass man unmöglich sagen kann, wo genau man steht.

Ich kann nur sagen, dass ich Spaß mitbringe und bin sehr gerne auf der Suche nach Fehler im Quellcode. Aber wie wir alle wissen, reicht das unter Umständen nicht aus.

Woran erkennt man einen guten Programmierer? Und vor allem: Woran erkenne ich, ob ich das Zeug dazu habe?

Ich habe mich zu dem Thema intensiv befasst. Immer wieder lese ich darüber, dass das Erkennen von Problemen und Algorithmen zur Lösung zu erschaffen einen guten Programmierer ausmachen.

Ich bin auch sehr Selbstkritisch. Manchmal muss man sich selbst sagen können: Lass es lieber sein. Das ist nicht dein Weg. Dieser Umstand gepaart mit meiner hohen Erwartungshaltung an mich selbst, ist Gift. Gift für meinen Geist. Denn ich stehe mir damit selbst im Weg.

Ich habe auch das Gefühl von Programmierbereich zu Programmierbereich zu pendeln. Dabei bleibt das Gefühl zurück, etwas angefangen zu haben, aber nicht richtig gelernt zu haben.

Vielleicht kann mir ein erfahrener Programmierer etwas zu dem Thema sagen? Über mehrere und fundierte Antworten wäre ich sehr dankbar.

SQL, HTML, programmieren, Java, pro, Code, Selbstzweifel
2 Antworten
Adonai1111
08.05.2020, 13:05
Prüfen ob Abfrage Daten enthält VBA Access?

Hallo zusammen,

ich habe in Access einen Button, der aus einer Abfrage eine PDF erstellt und diese via E-Mail versendet.

Ich möchte den Button so programmieren, sodass die PDF nicht verschickt wird, wenn die Abfrage keine Daten enthält.

Teil der Ereignisprozedur "Beim Klicken" für den Button:

Private Sub Befehl96_Click()

    Dim stDocName As String     Dim fileName, fldrPath, filePath As String     Dim answer As Integer       Dim strFrom, strSchema, strPW, strServer, strText, strBenutzer, strUseSSL, strSubject, strBody, strFile As String  'E-Mail     Dim intPort As Integer     Dim cdoMsg As CDO.Message


    Const cdoAnonymous = 0          Const cdoBasic = 1      Const cdoSendUsingPort = 2          stDocName = "Artikeländerungsprotokoll_ARTGruppe"     DoCmd.OpenQuery stDocName, acNormal, acEdit          fileName = Format(Date, "YYYYMMDD") & "_Aenderungsprotokoll_Herstellverfahren"     fldrPath = "K:\ARTIKEL\SQL_Protokolle"     filePath = fldrPath & "\" & fileName & ".pdf



    If Dir(filePath) <> "" Then
        
        answer = MsgBox(prompt:="PDF-Datei existiert bereits: " & vbNewLine & filePath & vbNewLine & vbNewLine & _
        "Möchten Sie die Datei ersetzen?", Buttons:=vbYesNo, Title:="Datei Name existiert bereits")
    
    If answer = vbNo Then Exit Sub
    End If
 
   DoCmd.OutputTo acOutputReport, "ARTIKELÄNDERUNGSPROTOKOLL ARTGruppe", acFormatPDF, filePath

Ich möchte prüfen, ob in der Abfrage"ARTIKELÄNDERUNGSPROTOKOLL_ARTGruppe" Daten enthalten sind. Wenn keine Daten enthalten sind, dann soll nur eine MsgBox erscheinen, die besagt, das keine Daten vorhanden sind und nichts weiter.

Ich bin ein Anfänger im programmieren und tue mir schwer...

Kann mir bitte jemand helfen?
Computer, Technik, programmieren, Access, VBA, Technologie, VBA-Code
1 Antwort
TechnikTim
08.05.2020, 08:58
CMD Numerische Konstante Fehler?

Ich habe mir ein Skript geschrieben, dass jeden Tag automatisch den richtigen Bericht öffnet. Das ist alle zwei Wochen eine Nummer mehr. Hat jetzt einen Monat ohne Probleme funktioniert. Heute hat er aber den Bericht von letzer Woche geöffnet. Gestern hatte er den richtigen. Ich hoffe ihr könnt anhand des Codes und es Fehlers sagen, wo das Problem liegt. Bin Systemintegrator in der Ausbildung. Kenne mich also ein ganz kleines bisschen mit programmieren aus. Ich glaube das ist ein total dämlicher Fehler. Aber ich finde ihn nicht. In der Berufsschule lerne ich übrigens Python. Deswegen kenne ich mich mit cmd kaum aus. Brauche ich ja eigentlich auch nicht für den Berufsalltag.

Hier der Code:

echo off
set jahr=%date:~-4%
echo Heute ist der %date%


if '%jahr%'=='2020' goto 2020
echo Es gibt keinen vorgefertigten Bericht mehr
Timeout /t 20


:2020
setlocal
chcp 1252>nul


REM KalenderWoche (Mo-SO)
REM Datum
set /A d=%date:~0,2%
set /A m=%date:~3,2%
set /A y=%date:~6,4%


REM Tag des Jahres
if %m% == 1 set /A DoY=d
if %m% == 2 set /A DoY=d+31
if %m% == 3 set /A DoY=d+59
if %m% == 4 set /A DoY=d+90
if %m% == 5 set /A DoY=d+120
if %m% == 6 set /A DoY=d+151
if %m% == 7 set /A DoY=d+181
if %m% == 8 set /A DoY=d+212
if %m% == 9 set /A DoY=d+243
if %m% == 10 set /A DoY=d+273
if %m% == 11 set /A DoY=d+304
if %m% == 12 set /A DoY=d+334


REM Schaltjahr?
set /A LY=(y/4)*4
if %y% NEQ %LY% goto noLY
if %m% GTR 2 set /A DoY=DoY+1


:noLY
REM Tag der Woche (Sonntag = 0)
for /f %%g in ('wmic path win32_localtime get dayofweek^|findstr /v /r "^$"') do (set DoW=%%g)
REM (Sonntag = 7)
if %DoW% == 0 set /A DoW=7


REM KW
set /A nSd=DoY+(7-DoW)
set /A KW=nSd/7
set /A delta=nSd-(KW*7)
if %delta% GTR 3 set /A KW=KW+1


REM Ausgabe der aktuellen KW
echo Wir sind in der %KW%. Kalenderwoche


REM Nummer des Berichts errechnen und richtigen Bericht öffnen
set /A Nummer=(KW+73)/2
echo Bericht: %Nummer%.docx
echo Fenster kann geschlossen werden oder wird geschlossen wenn der Bericht geschlossen wird.
chcp 850>nul
start winword.exe "G:\DATEN\Dez1\FD102\IuK\Azubis\"Mein Name"\Berichte\2020\%Nummer%.docx"
timeout /t 20
endlocal
exit

Und die Ausgabe mit der Fehlermeldung:

Heute ist der 08.05.2020
Ungültige Zahl. Numerische Konstanten sind entweder dezimale (17),
hexadezimale (0x11) oder oktale (021) Zahlen.
Wir sind in der 18. Kalenderwoche
Bericht: 45.docx
Fenster kann geschlossen werden oder wird geschlossen wenn der Bericht geschlossen wird.
Gewartet wird 17 Sekunden. Weiter mit beliebiger Taste...
Computer, Technik, Fehler, programmieren, bat, Batch, cmd, Technologie, Fehlermeldung, Schaltjahr, batch-trick
1 Antwort
M3LLemAmr
08.05.2020, 02:27
Browserfehler: "0: Unable to get property 'SavePersonalAndPaymentData' of undefined or null reference"?

Hallo,

ich habe eine Aufgabe gemacht und mein Browser gibt diesen Fehler aus:

0: Unable to get property 'SavePersonalAndPaymentData' of undefined or null reference

Ich glaube aber, dass die Aufgabe richtig ist!

Ich habe es auch einen Freund geschickt und bei ihm funktioniert es ebenfalls nicht.

HTML:

<!DOCTYPE html>
<html>
  <head lang="de">
    <meta charset="UTF-8" />
    <style type="text/css"></style>
    <title>Lieblings Professor</title>
  </head>
  <body>
    <form>
      <fieldset>
        <legend>Notenberechnung<br>Teilaufgaben</legend>

        <label for="aufgabe1">Aufgabe 1:</label>
        <input type="number" name="Augabe1" id="a">
        <br><br>

        <label for="aufgabe2">Aufgabe 2:</label>
        <input type="text" name="Aufgabe2" id="b">
        <br><br>

        <label for="aufgabe3">Aufgabe 3:</label>
        <input type="number" name="Augabe3" id="c">
        <br><br>

        <label for="aufgabe4">Aufgabe 4:</label>
        <input type= "number" name="Augabe4" id="d">
        <br><br>

        <button id="069" value="069">druck berechne</button>
      </fieldset>
    </form>
    <h1>Note</h1>
    <div id="note"></div>
    <script src="x1.js"></script>
  </body>
</html>
</form>
<h1>Note</h1>
<div id="note"></div>
<script src="x1.js"></script>
</body>
</html>

JavaScript:

"use strict"

window.addEventListener("load", init);

function init() {
  console.log("Fenster ist geladen");
  let btn = document.getElementById("069");
  btn.addEventListener("click", btnfk);

  function btnfk() {
    console.log("ich wurde geklickt!!!!");

    let aufgabe1 = document.getElementById("a").value;
    console.log(aufgabe1);
    let aufgabe2 = document.getElementById("b").value;
    console.log(aufgabe2);
    let aufgabe3 = document.getElementById("c").value;
    console.log(aufgabe3);
    let aufgabe4 = document.getElementById("d").value;
    console.log(aufgabe4);

    aufgabe1 = Number(aufgabe1);
    aufgabe2 = Number(aufgabe2);
    aufgabe3 = Number(aufgabe3);
    aufgabe4 = Number(aufgabe4);

    let note = document.getElementById("note");
    global = global + aufgabe1 + aufgabe2 + aufgabe3 + aufgabe4;

    note.textContent = global;
    let note5 = document.createElement("div");
    document.body.appendChild(note5);

    if (global < 12) {
      note5.textContent = "Ihre Note ist 5!!!!!";
    }

    if (global >= 12 && global <= 15) {
      note5.textContent = "Ihre Note ist 4 ...";
    }

    if (global >= 15 && global <= 18) {
      note5.textContent = "Ihre Note ist 3";
    }

    if (global >= 18 && global <= 21) {
      note5.textContent = "Ihre Note ist 2 super";
    }

    if (global >= 21) {
      note5.textContent = "Ihre Note ist 1 WOW";
    }
  }
}

let global = 0;

Wenn ich statt Zahlen aber Buchstaben eingebe, werden sie gespeichert. Ansonsten mit Zahlen werden sie nicht gespeichert und verschwindet sofort.

Browser, Fehler, HTML, programmieren, JavaScript, HTML5
2 Antworten
Jancek
06.05.2020, 02:14
Mit Links
MySQL kann keine Verbindung zur Datenbank aufbauen?

Guten Tag,

ich bitte euch vorab den ganzen Text durchzulesen, da ich schon seit Tagen daran sitze das ganze zu beheben, sprich die Lösung zu finden und es mir nicht gelingt, danke!

Ich habe seit einiger Zeit einen VServer auf Debain 9 laufen, auf dem habe ich auch das beliebte "CloudNET" installiert und problemlos eingerichtet.

Ich habe mir auch ein Plugin heruntergeladen, welches MySQL benötigt, damit es funktioniert. Daher habe ich mir auch MySQL unter der Anleitung des folgenden Videos heruntergelden (https://www.youtube.com/watch?v=XP2Kvux4Zug&t=535s) Habe alles genau so gemacht, wie es im Video gezeigt wurde.

Jetzt aber das komische: Ein Kollege von mir hat das ganze ebenfalls ausprobiert, sprich sich das Plugin geholt, einen VServer mit Debain 10 am laufen gehabt und, jedoch kein CloudNet und es ging, er hatte das gleiche Video wie ich zur Installation benutzt.

An CloudNET liegt es übrigens nicht, ich habe es auf einem Server, unabhängig von den anderen mit einem anderen Port versucht und es ging trotzdem nicht. Ebenfalls hat es anscheinend auch nichts mit dem Betriebssystem zu tun, da im Video gezeigt wird, dass es für Debain 9 sowie Debain 10 funktioniert.

Immer wieder die selbe Fehlermeldung: Error: Could not connect to database (com.mysql.jdbc.exceptions.jdbc4.MySQLNonTransientConnectionException: Could not create connection to database server. Attempted reconnect 3 times. Giving up.)

Liegt es eventuell an dem Hoster, wir beide benutzen einen Unterschiedlichen ich nutze (https://www.opusx.io/). Er nutzt (https://mc-host24.de/)? Kann mir da irgendjemand weiterhelfen, ich wäre wirklich dankbar!

Computer, programmieren, Datenbank, MySQL, PHP, Root Server, vServer, phpMyAdmin, CloudNet
3 Antworten

Meistgelesene Beiträge zum Thema Programmieren
Mehr meistgelesene Fragen zu Programmieren