Verrückte Frage: ist es möglich, z.B. Windows 3.1 auf einer Canon IXUS 50 zu installieren?

LG

Ich habe diesen Fake-Virus in Visual Basic Skript erstellt:

Option Explicit

Dim Antwort
Dim msgCount
msgCount = 0

Antwort = MsgBox("Dies ist kein schädlicher Virus, aber dein Computer könnte abstürzen. Willst du fortfahren?", vbYesNo + vbExclamation, "Warnung!")

If Antwort = vbNo Then
  WScript.Quit
End If

' Display the first message and wait for completion
CreateAndRunMsgBox "Bei diesem Virus wird dein Computer neu gestartet oder bekommt einen Bluescreen. Keine Sorge, es passiert nichts und du kannst nach einem Neustart deinen PC wieder ganz normal benutzen.", "Warnung", True

' Start the file Brauchtman.txt
StartFile "Brauchtman.txt"

' Wait for 10 seconds
WScript.Sleep 10000

Do
  ' Display the second message without waiting
  CreateAndRunMsgBox "Benutzt du immer noch diesen Computer?", "lol", False
  msgCount = msgCount + 1
  If msgCount >= 190 Then
    ShutDownComputer
    Exit Do
  End If

  ' Start the file Music.mp3
  StartFile "Music.mp3"
   
  ' Open the Rick Roll link multiple times
  Dim i
  For i = 1 To 16
    StartURL "https://www.youtube.com/watch?v=xvFZjo5PgG0"
    ' Randomly display the hacked message
    If RandomlyDisplayMessage() Then
      CreateAndRunMsgBox "Hacked by ᴎͥoɘͣmͫiꙄ", "Warnung", False
    End If
  Next
   
  ' Display the second message again without waiting
  CreateAndRunMsgBox "Benutzt du immer noch diesen Computer?", "lol", False
  msgCount = msgCount + 1
  If msgCount >= 190 Then
    ShutDownComputer
    Exit Do
  End If
   
  ' Open the Rick Roll link a few more times
  For i = 1 To 2
    StartURL "https://www.youtube.com/watch?v=xvFZjo5PgG0"
    ' Randomly display the hacked message
    If RandomlyDisplayMessage() Then
      CreateAndRunMsgBox "Hacked by ᴎͥoɘͣmͫiꙄ", "Warnung", False
    End If
  Next
Loop

Sub CreateAndRunMsgBox(message, title, waitForCompletion)
  Dim fso, tempFolder, tempFile, fileStream, shell
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set shell = CreateObject("WScript.Shell")
  tempFolder = fso.GetSpecialFolder(2) ' 2 = TemporaryFolder
  tempFile = tempFolder & "\" & fso.GetTempName() & ".vbs"
   
  ' Create the temporary VBS file
  Set fileStream = fso.CreateTextFile(tempFile, True)
  fileStream.WriteLine "msgbox """ & message & """, vbInformation, """ & title & """"
  fileStream.Close
   
  ' Run the temporary VBS file asynchronously
  shell.Run """" & tempFile & """", 0, waitForCompletion
   
  ' Delete the temporary VBS file after a short delay if not waiting for completion
  If Not waitForCompletion Then
    shell.Run "cmd /c ping 127.0.0.1 -n 3 > nul && del """ & tempFile & """", 0, False
  End If
End Sub

Sub StartFile(fileName)
  CreateObject("WScript.Shell").Run """" & fileName & """", 1, False
End Sub

Sub StartURL(url)
  CreateObject("WScript.Shell").Run """" & url & """", 1, False
End Sub

Sub ShutDownComputer()
  CreateObject("WScript.Shell").Run "shutdown -s -t 0", 1, False
End Sub

Function RandomlyDisplayMessage()
  Randomize
  ' 50% Chance to display the message
  If Int(Rnd * 2) = 0 Then
    RandomlyDisplayMessage = True
  Else
    RandomlyDisplayMessage = False
  End If
End Function

und ich wollte fragen, wie man z.B. solche Memz Effekte reinmacht.

Ich weiß, Memz ist ja nicht in VBS geschrieben, aber geht das trotzdem?

Ich bin 12 und bekomme 12 Euro Taschengeld pro Monat (7 Euro Bar, 5 Euro aufs Konto). Findet ihr das fair? Weil im Internet steht das: Bei Kindern über 10 Jahren beträgt die Taschengeldempfehlung des Deutschen Jugendinstituts (DJI) 16 bis 21 Euro pro Monat. Bei den 12- bis 13-Jährigen sind es 21 bis 26 Euro pro Monat.

Ich habe in einer VBS-Datei eine MSG-Box:

MsgBox "Dies ist kein schädlicher Virus, aber dein Computer könnte abstürzen. Willst du fortfahren?", 4, "Warnung!"

Und ich wollte fragen wie ich wenn ich auf Nein klicke die dazugehörige .bat Datei und die VBS-Datei beende.

Ich schreibe ganz normal und spamme nichtmal und dann kommt das:

Eine zwölfjährige Fremde aus einer random Gruppe die weit weg wohnt will in den nächsten 10 Minuten abhauen (Weil jemand Schluss gemacht hat und sie Probleme mit ihrer Familie hat) und sich irgendwann umbringen. Ich habe versucht sie per Whatsapp zu stoppen, es klappt aber nicht. Hat jemand gute Sätze oder Argumente damit sie bleibt?

Ich habe eine alte Wii U mit kaputtem Gamepad, reparieren lohnt sich nicht 1. weil ich wenig geld habe und 2. weil die Konsole so alt ist. Wieviel würde ich eurer Meinung nach bekommen? Und für wieviel Euro wäre es angemessen sie in Ebay/Kleinanzeigen reinzustellen?

Ich habe einen DIY Lautsprecher mit einem Lautsprecher von einem altem Karaokemikrofon mit einem Stromverbinder per USB angeschlossen, und dann wurde er heiß, hat komische Geräusche gemacht und beim PC kam die Benachrichtigung "Stromüberspannung". Ich habe ihn sofort ausgesteckt. Liegt es daran das der PC-USB Anschluss mehr als 3 Watt hat? Das hat nämlich der Lautsprecher.

Simeon

Ich habe jetzt ein (unaufgeräumtes) Setup und wenn man die Unordnung nicht beachtet, bewertet mal. (Noch keinen neuen PC)

Ich habe eine Schrott Spielekonsole und da wollte ich das Display ausbauen, habe fast keine Ahnung von Technik und wollte fragen ob es da einen Adapter gibt (20-pin, eine Reihe)

Bitte helft mir!