Appendix-Thread-Evaluate-Range-(-Codes-for-other-Threads-HTML-Tables-etc-)

Some extra notes in support of this Thread post:
https://www.dsl-forum.de/threads/251...l=1#post169630
Einige zusätzliche Hinweise zur Unterstützung dieses Thread-Beitrags:
https://www.dsl-forum.de/threads/251...l=1#post169630


Kopien einiger der fehlenden Frageposts
Copies of some of the missing initial question posts

---

---

Speedport W504V - kann nicht kommunizieren. Online, verbunden, aber antwortet nicht auf 192.168.2.1 oder https://speedport.ip in der Adressleiste
( DSL alles in Ordnung, aber nur 4 grün licht beleuchtet und keine funktionieren Telefon oder Internet

Hello
Ich bin zum ersten Mal hier und meine Muttersprache ist nicht Deutsch, also gehen Sie bitte schonend mit mir um, und ich entschuldige mich im Voraus für fehlerhafte Posting-Protokolle :)

Ich habe schon oft einige ähnliche forumsbeitrag durchgelesen, beispielsweise:
https://www.dsl-forum.de/threads/184...241#post120241
https://www.dsl-forum.de/threads/18403-speedport-w504v-nicht-ansprechbar?p=120241#post120241
https://www.dsl-forum.de/threads/212...-mehr-moeglich
https://www.dsl-forum.de/threads/21258-speedport-w504v-kein-zugriff-mehr-moeglich

Sie scheinen um das Problem herumzureden, kamen aber nie zu einer vollständigen Lösung.
Jetzt habe ich das gleiche Problem und suche Hilfe

Das spezifische aktuelle Problem:
Mein Router, ein Speedport W504V, verbindet sich erfolgreich mit jedem meiner Computer.(WLAN oder LAN kable)
Verschiedene Dinge bestätigen mir, dass die Speedport W504V die IP-Adresse 192.168.2.1 hat, wie es sollte.
Verschiedene Dinge und Leute haben bestätigt, dass mit dem DSL-Anschluss alles in Ordnung ist.
Verschiedene Dinge deuten darauf hin, dass ich online bin und eine funktionierende DSL-Verbindung habe.
Ich habe nie bewusst versucht, interne Einstellungen des Routers zu ändern
Aber das Problem:
_ Internet (und Telefon) funktioniert jetzt nicht. (Es hat für viele Jahre zuvor funktioniert)
_ beim IP 192.168.2.1 oder https://speedport.ip in die Adresszeile eingebe, kommt nur "Fehler: Netzwerk-Zeitüberschreitung - Der Server unter speedport.ip braucht zu lange, um eine Antwort zu senden." Egal mit welchem Browser oder Computer, ( und ich habe viele Computern und Browsers ).

Einige allgemeinere Hintergründe/ wie das Problem entstanden ist
Für etwa 10 Jahr habe ich eine Speedport W504V als teil meine Haupt Festnetz DSL Flatrate Internet Haus Anschluss Auftrag mit Deutscher Telekom
Meist war es zuverlässig. Wenn alles gut funktioniert, funktionieren Telefon und Internet und alle 5 grünen Lichter am Speedport W504V Leuchten: Von links nach rechts werden diese grünen Lichter wie folgt angezeigt:
Power *
DSL *
Online *
WLAN *
Telefon *

In der Vergangenheit es trat oft ein ähnliches Problem auf, aber im **Durchschnitt nur einmal in der Woche: Internet und Telefon funktionierten nicht mehr. Fast immer, wenn dies geschah, das letzte Licht, das Telefon licht, leuchtete nicht mehr. Es werden also nur 4 der 5 Lichter angezeigt.
(Ich habe noch nie eine andere Situation erlebt, außer
_ dass alle 5 Lichter aufleuchten, wenn alles funktioniert,
oder
_ nur die ersten 4 Lichter aufleuchten, wenn Telefon und Internet verloren gehen).

( ** aber ich betone im Durchschnitt: Manchmal kann es ein paar Mal in der Woche passieren, manchmal kann es nur einmal im Monat passieren)

Normalerweise wird das Problem behoben, indem man den Stecker aus dem Router (Telekom Speedport W504V) zieht, 30 Sekunden wartet und dann wieder verbindet. Meist klappt es beim erste versuche, konnte aber mal das bis eine Stunde und mehrerer versuche bis alles wieder gut war – Aber eine lange Pause ohne Internet und Telefon war eine Ausnahme

Zunehmend seit etwa die letzte 2 Monaten, war es langer bis die „Stecker raus, warten, Stecker rein Lösung“ funktioniert. Also öfter mal eine Pause im Internet und Telefon. Es trat ein paar Stunden auf, dann war es ein paar Mal für einen Tag weg und das neueste Problem, das ist noch seit fast zwei Woche. Also mit dem Speedport bin ich jetzt in die 4 grün licht keine Internet oder Telefone zustand jetzt dauernde.
Mein erster Hilferuf ging an die Telekom. Es folgten viele Telefon- und E-Mail-Gespräche mit verscheiedener Leute von Telekom. Viele von ihnen haben die Telefonleitung überprüft - alles gut - in ihren Worten: Alle Versuche, die "Synchronisation" zu überprüfen, sagen ihnen, dass die Leitung in Ordnung ist. Verscheiedener Leute von Telekom können auch von ihrem Ende aus , aus der Ferne sehen, wenn ich das "stecker raus, warten, stecker rein" mache.
Aber sie können nicht verstehen, warum ich nicht mit meinem Speedport W 504V kommunizieren kann.
Also gaben sie auf.

Der Speedport W504V ist mein Router - ich habe ihn bei der Telekom gekauft, nicht gemietet. Es ist außerhalb der Garantiezeit und sie wollten es sowieso nicht ersetzen.
Ich miete jetzt einen neuen Router von Telekom. ( FRITZ!Box 7590 ). Es funktioniert .. meistens hab ich Internet an manche meine Computern , aber auch nicht ohne einige neue Probleme - aber das ist ein separates Thema.

Zu meiner eigenen Zufriedenheit würde ich gerne weiterhin sehen, ob ich den Speedport W504V wieder zum Laufen bringen kann, weil, in Zukunft könnte ich viel mehr auf ein funktionierendes Internet angewiesen sein und von zu Hause aus arbeiten, daher möchte ich so viel Kontrolle und Verständnis dafür haben.
Telekom nützt mir in dieser Speedport W 504V Frage / Probleme nichts mehr.

Kann mir hier jemand etwas zum Ausprobieren empfehlen?

Bitte, ich bin ein Laie mit fast keinen Computerkenntnissen. Aber ich bin lernbegierig. Ich habe Computer mit XP, Vista, Windows 7 und Windows 10 für mich verfügbar. Ich bin mit den älteren Betriebssystemen vertrauter, aber ich kann alle Vorschläge mit jedem System ausprobieren, aber ich bräuchte aufgrund meiner begrenzten Computerkenntnisse klare Anweisungen.
Außerdem: Bitte verzeihen Sie mir und denken Sie nicht, dass ich Sie ignoriere, wenn ich lange brauche, bis ich antworte. Ich habe derzeit nur eingeschränkten Zugang zum Internet. Aber ich werde hier auf jeden Fall häufig nachsehen und so schnell wie möglich Antworten geben. Aber das kann dauern

Danke
Alan Elston

( PS Eine Sache, ich bin mir nicht sicher, ob das relevant sein könnte. Telekom sagt mir, dass mein Anschluss ein dynamischer / automatischer ist: Wenn ich die neue Fritzbox anschließe, bekomme ich VDSL aus der festnetz ; Wenn ich den älteren Speedport anschließe, wird es automatisch auf geschaltet gib das langsamere DSL aus der festnetz

PS 2 Hier der Link zu meiner diesbezüglichen Frage im Telekom Hilfeforum:
https://telekomhilft.telekom.de/t5/T...s/td-p/5342695
https://telekomhilft.telekom.de/t5/Telefonie-Internet/Ich-kann-keinen-Ausfall-unseres-Telefon-und-Internet-Festnetzes/td-p/5342695
** Es ist Gelöst markiert, ist aber nicht gelöst , meine Meinung nach )

Edit PS 3 Eine letzte Sache, etwas Seltsames. Ich verwende manchmal ein kostenpflichtiges VPN. ( hide.me über OpenVPN oder SoftEther ). In der Vergangenheit, als ich die "4 nur Lichter kein Internet- oder Telefon problem" hatte, passierte oft etwas Seltsames. Wenn ich einen Computer über VPN verbunden hatte, dann hatte dieser Computer noch einige Zeit einen funktionierenden Internetzugang. Bei meinem aktuellen Problem hatte ich immer noch Internet auf einem Computer über SoftEther für zwei Tage in dem aktuellen Langzeitproblem!!! - Wenn ich während dieser Zeit das VPN auf diesem Computer trennte, hatte ich ohne VPN kein Internet. Durch das erneute Verbinden dieses Computers über VPN hatte ich wieder ein funktionierendes Internet
( Ich sollte hier auch sagen, dass ich bei meinen verschiedenen Experimenten zur Lösung des Problems manchmal alle Computer getrennt und ausgeschaltet habe. Das hat mir nicht geholfen das Problem zu lösen
)

Some extra notes in support of this Thread post:
https://www.dsl-forum.de/threads/251...l=1#post169630
Einige zusätzliche Hinweise zur Unterstützung dieses Thread-Beitrags:
https://www.dsl-forum.de/threads/251...l=1#post169630


Kopien einiger der fehlenden Frageposts ( Nicht komplete )
Das sind nur einige meiner groben Notizen

Copies of some of the missing initial question posts ( Not complete )
They are just some of my rough notes

---

---

Beispiels: ....... mit dem Speedport W 504V wird es ab Montag nicht mehr funktionieren, da dieser kein VDSL verarbeiten kann. https://telekomhilft.telekom.de/t5/T.../true#M1390337
....... Die Leitung schaltet sich Montag automatisch rauf und lässt sich nicht mehr stoppen. Der VDSL-Port ist variabel und schaltet sich runter, damit dein Speedport 504V das auch packt https://telekomhilft.telekom.de/t5/T.../true#M1390697


Vielleicht die Frage anders stellen. Sagen wir, ich habe einen perfekten, voll funktionsfähigen Speedport W504V. (Ich werde wahrscheinlich in ein oder zwei Tagen haben, weil ich ein paar bei ebay vorgestern gekauft habe)
Das hätte vor ein paar Wochen bei meinem bisherigen Telekom DSL 16.000 RAM IP funktioniert

Ich habe jetzt VDSL 50. Ich weiß, dass die Fritzbox funktioniert, (meistens)

Aber wird irgendwo etwas zurückfallen, Rückfall oder sonst was zaubern, damit ein Speedport noch funktioniert.

Einige Leute bei der Telekom haben mir gesagt, dass es so sein wird. Einige waren anderer Meinung. Telekom wissen es also nicht!




Hi Broesel
Danke für die Antwort.

Quote:

---

Originally Posted by Broesel

deine Lan-Verbindungen an der Frizbox 7590 (Netzwerkkabel-Verbindungen) funktionieren ja laut deiner Beschreibung.--

---

Gerade jetzt scheint die Fritz Box 7590 auf den meisten meiner Computer korrekt zu funktionieren und bietet ein stabiles Internet über WLAN oder LAN.
Daran möchte ich jetzt noch nichts machen, bin aber natürlich daran sehr interessiert, eventuell gegen Ende der Woche noch einmal zu experimentieren, also werde ich dann jeden Vorschläge ausprobieren.

---

Quote:

---

Originally Posted by Broesel

... funktioniert aber nur wenn du SSID und WLAN-Schlüssel deines Speedport W 504 V "nie geändert" hast.
Schau mal auf die Rückseite/Unterseite deines Speedport W 504 V....

---

Ich hatte es neu gekauft, es hat noch nie jemand etwas geändert, und zum Beispiel nutze ich die WLAN-Info auf die Rückseite, wenn ich nach Passwörtern usw. gefragt werde. Das alles hat immer funktionieret mit dem info von die Rückseite

---

Zu den Einstellungen an der Fritz Box 7590:
Ich verstehe nicht allzu viel über die technischen Details der Einstellungen. Nach einigem Herumspielen am vor letzten Wochenende, als ich es ausgepackt und zum ersten Mal angeschlossen habe, hat es irgendwann beim LAN Verbindung kable zu einer meine Laptops , einen automatischen Einrichtungsvorgang gestartet, den ich laufen gelassen habe, und einfach alle vorgeschlagenen Einstellungen belassen und auf "Weiter" klicken "-Taste, bis es fertig war (Die ganze Geschichte hier: https://telekomhilft.telekom.de/t5/T.../true#M1390641 )
Am Ende des Prozesses wurden mir diese Informationen präsentiert:
https://i.postimg.cc/HW8m5XYb/Fritzb...inrichtung.jpg
https://i.postimg.cc/sDFrJxxq/Fritzb...inrichtung.jpg
https://i.postimg.cc/jdzr3TJ5/Fritzb...inrichtung.jpg
Gleichzeitig begann das Internet auf allen bisher angeschlossenen Computern voll zu funktionieren

---

Quote:

---

Originally Posted by Broesel

...Du könntest z.B. die SSID und den WLan-Schlüssel deines Speedport W 504 V auf die Fritzbox 7590 übertragen (umschreiben).
Das speichern nicht vergessen......
So mach ich es immer wenn ich mal einen anderen WLan-Router benutze und i.d.R. klappt das auch.
Das merk ich z.B. daran wenn bei uns zu Hause niemand meckert.

---

gerade benutze und experimentiere nur ich mit Dingen, daher denke ich, dass ich die Dinge vorerst so lassen werde, wie sie sind, aber das könnte eine Idee für später sein, danke für den Vorschlag.

---

Quote:

---

Originally Posted by Broesel

....
Am besten auf Verschlüsselungsstärke WPA/WPA2. Dein Speedport und die Fritzbox können das.

---

Ich bin mir nicht sicher, wie ich das machen würde. Vielleicht habe ich diese Einstellung schon? - hier wird ein WPA2 angezeigt https://i.postimg.cc/HW8m5XYb/Fritzb...inrichtung.jpg



Alan




Hi
Ja, ich vermutete auch, dass die Situation einigermaßen günstig war, mir einen VDSL-Vertrag zu unterjubeln.
Aber nach 10 Jahren habe ich erwartet, dass es an der Zeit sein könnte, ein wenig zu aktualisieren, zumal ich in ein paar Monaten zu Hause möglicherweise mehr beschäftigt und auf ein gutes Internet angewiesen bin.
Vielleicht war das Mieten des Modems/Routers im Nachhinein keine so gute Idee. Ich hatte nicht gedacht, dass ich sie so günstig kaufen kann. Auf der anderen Seite sollte ich bei einem gemieteten Gerät bessere Hilfe erwarten, wenn ich irgendwelche Probleme habe, die mit dem Modem/Router zusammenhängen könnten.

Mein alter Vertrag ( DSL 16.000 ) hat 35 Euro komplett im Monat gekostet. Anscheinend habe ich den Speedport gekauft - ich erinnere mich jetzt nicht mehr. Der neue Vertrag ist auf 35 Euro für 6 Monate festgelegt, danach kostet er 40 Euro pro Monat. Der Vertrag hat eine Mindestlaufzeit von 24 Monaten, was der übliche Deal ist. Die FRITZ!Box 7590 kostet 8 Euro monatlich, 12 Monate Mindestmietdauer.

Vielleicht hätte ich einen besseren Deal machen können, aber wenn sich die Fritzbox beruhigt und ich das verbleibende seltsame Problem lösen kann, das bei einigen meiner Computer festgestellt wurde, dann werde ich vielleicht die Dinge so lassen, wie sie sind.

Ich denke, ein Speedport W723V ist für VDSL in Ordnung, und sie scheinen genauso billig zu sein wie ein Speedport W504V bei ebay. Vielleicht werde ich mir also ein paar davon kaufen, nur um es in den nächsten Tagen zum Spaß auszuprobieren.

---

Quote:

---

Originally Posted by Hardwaremensch

....dein W504 hat definitiv KEINEN variablen Schalter und wird an einem VDSL-Anschluß nicht funktionieren. ....

---

Ich habe mich wohl nicht ganz klar erklärt. Was ich meinte war, dass einige Leute bei der Telekom vorgeschlagen haben, dass sich die automatische Umschaltung in einer nahegelegenen Box befindet, wahrscheinlich was ich nahe meinem neresten Nachbar gesehen habe: Vor einigen Jahren tauchte neben der alten kleineren eine viel größere Telekom-Box auf. Bei Recherchen im Internet sieht es so aus:
https://de.wikipedia.org/wiki/Very_H...ubscriber_Line
https://i.postimg.cc/qhWstCrv/290px-...he-Telekom.jpg
Was ich dachte, verstanden zu haben, war, dass sich der Switch in dieser Box befindet und es irgendwie bermerkt , welchen Router ich habe und das gelieferte Signal entsprechend auf DSL oder VDSL ( https://telekomhilft.telekom.de/t5/T.../true#M1390697 …… Der VDSL-Port ist variabel und schaltet sich runter, damit dein Speedport 504V das auch packt. Also einfach laufen lassen und alles wird gut ….. )
Aber vielleicht habe ich das nicht richtig verstanden.
Jedenfalls haben einige andere bei der Telekom gesagt, dass es keine Chance gibt, dass der Speedport W504V jetzt für mich funktioniert.

Die Informationen, die ich habe, sind also unsicher.

Meine Vermutung eines ungebildeten Laien, basierend auf meinen jüngsten Experimenten, ist, dass ich seit der "Umstellung" vor einer Woche keinen Speedport W504V niemals verwenden könnten , auch wenn er einwandfrei funktionierte so wie er soll.. Ich begründe diese Schlussfolgerung auf folgendem: Seit dem "Schalter" vor einer Woche verhält es sich meind speedport W504V anders:
Wie zuvor leuchten das erste grüne Licht ( Power ) und das vierte grüne Licht ( WLAN ) dauerhaft. Aber jetzt das grüne DSL-Licht blinkt ständig und das grüne OnLine-Licht geht nie an. ( Vorher hatte ich die Situation wie in meinem beschrieben hier – entweder 4 oder 5 grün licht dauende an.
So wie ich es verstehe, bzw. vermute, deutet ein endlos blinkendes DSL-Licht darauf hin, dass es versucht, Kontakt aufzunehmen, aber nie dort ankommt, oder einige Worte in diesem Sinne.


Hello Hardwaremensch.
Ich wollte dich nicht wieder mit einer langen Geschichte langweilen, aber wie du fragst...

Quote:

---

Originally Posted by Hardwaremensch

…WARUM willst du ihn widerrufen?

---

Ich bin mir noch nicht sicher, ob ich das machen will, aber wenn ja, muss ich es in den nächsten Tagen tun

---

Quote:

---

Originally Posted by Hardwaremensch

Welchen Vertrag hast du denn,

---

Ich verstehe nicht allzu viel von , aber Du kannst von hier aus sehen,
https://telekomhilft.telekom.de/t5/T.../true#M1389675
dass Deutscher Telekom mir sagen, dass ich das früher hatte
DSL 16.000 RAM IP ( mit das evtl. jetzt defekt Speedport W504V Typ A )
Und jetzt anscheinend das habe
VDSL 50 und einer FRITZ!Box 7590

Aus einigen anderen Vertrag Papierkram sehe ich, dass ich sie hatte „Magenta Zuhaus S“
Download: Max. 16 MBit/s, Normal 9,5 MBit/s, Min. 6,304 MBit/s
Upload: Max. 2,4 MBit/s, Normal 1,5 MBit/s, Min. 0,704 MBit/s


Und jetzt das neue Vertrag, was ich evtl. widerrufen ist „Magenta Zuhaus M“ VDSL 50
Download: Max. 50 MBit/s, Normal 47 MBit/s, Min. 27,9 MBit/s
Upload: Max. 10 MBit/s, Normal 9,4 MBit/s, Min. 2,7 MBit/s

---

Some extra notes in support of this Thread post:
https://www.dsl-forum.de/threads/251...l=1#post169630
Einige zusätzliche Hinweise zur Unterstützung dieses Thread-Beitrags:
https://www.dsl-forum.de/threads/251...l=1#post169630


Kopien einiger der fehlenden Frageposts ( Nicht komplete )
Das sind nur einige meiner groben Notizen

Copies of some of the missing initial question posts ( Not complete )
They are just some of my rough notes

---

---

Quote:

---

Originally Posted by Hardwaremensch

Und WARUM willst du ihn widerrufen?

---

Wenn ich das tue, hat das mehrere Gründe:
_ Im Nachhinein denke ich, dass etwas mehr Zeit hätte investieren müssen, um zu sehen, ob das anfängliche Problem mit dem Speedport aus den in meinem letzten beitrag genannten Gründen behoben werden könnte

_ Ich habe keine Leistungs- / Geschwindigkeitsverbesserung bemerkt (aber ich gestehe, ich verstehe nicht genug, um gründlich zu testen, und ich kann die Systeme nicht vergleichen, da ich jetzt nur das eine System habe.)

_ Ich war nicht allzu beeindruckt von der Unterstützung, die ich von der Telekom hatte. Es wurde variiert: widersprüchliche Informationen, falsche Informationen oder oft keine Informationen, das heißt manchmal auch keine Antworten. Die verschiedenen Hotlines haben sich als fast so nutzlos erwiesen wie die ausländischen Callcenter, die manche Unternehmen nutzen. Das ist mir derzeit weniger wichtig, aber in ein paar Monaten bin ich vielleicht viel stärker auf einen zuverlässigen Internet zu Hause angewiesen. Der neue Vertrag hat eine Laufzeit von 24 Monaten, den vorherigen könnte ich in ca. einem Drittel dieser Zeit kündigen, wenn ich entscheide, dass die Telekom kein verlässlicher Partner für mich ist.

_ Wenn wir vorerst davon ausgehen, dass mein aktuelles Problem auf ein Problem mit meinem Speedport zurückzuführen ist, ist das neue System viel weniger zuverlässig: Früher hatte ich in den letzten 10 Jahren nur selten Internetverluste. Bisher schlägt das neue System etwa 30 % der Zeit im Internet aus. Das Problem tritt zeitweilig auf und kommt von selbst wieder, aber es nützt nicht viel, wenn ich ein kontinuierliches Internet möchte oder später brauche

_ Auf einigen meiner Computer habe ich ein neues Problem, sie akzeptieren den Netzwerkschlüssel nicht.
( https://telekomhilft.telekom.de/t5/T.../true#M1390641
)
https://i.postimg.cc/0KkF1YRL/XP-Net...ssel-error.jpg
Ich bin mir ziemlich sicher, dass dieses neue Problem auf das neue System zurückzuführen ist, da ich es noch nie zuvor gesehen habe, weder zu Hause noch als diese Laptops häufig von zu Hause aus auf vielen verschiedenen Systemen verwendet wurden.


Aber ich werde drüber schlafen und morgen mit klarem Kopf nachdenken


Ich gehe davon aus, dass die Telekom mir sagen würde, dass es entweder schwierig oder unmöglich ist, die Dinge wieder so zu machen, wie sie waren. Ob das stimmt, ist eine andere Frage.


Alan

https://telekomhilft.telekom.de/t5/T.../true#M1390697


Als ich gestern Abend vor dem Schlafengehen die ausführlichen Anweisungen meines Speedports gelesen habe, sind einige Dinge aufgefallen, die ich möglicherweise übersehen habe.
Mir ist auch gestern aufgefallen, dass man bei ebay einen Speedport W504V sehr günstig ergattern kann: Habe mir heute Morgen gleich einen gekauft, neu, originalverpackt, komplett für 1 Euro. Eines der Kabel oder das Netzteil allein ist das Geld wert, - auch wenn mir der Speedport nicht hilft, habe ich immer noch ein Schnäppchen. ( Netzteil habe ich noch zu prüfen, wie Du vorgeschlagen hast - also bekomm ich bald einen neuen zum Vergleichen)

Man ist immer schlauer danach – ich hätte besser etwas warten hatten vor ich Telekom kontaktiert, evtl. eine neue Speedport erste aus probiert nach eine mehr gründlich Internet recherchieren und gründliches erneutes Lesen der originalen sehr detaillierten Speedport geliefert Anweisungen.
Für das Extra Geld , das ich pro Monat für meinen neuen Vertrag zahle, hätte ich mehrere neue Speedports kaufen können.

Ich persönlich bevorzuge immer mindestens zwei Lösungen gegenüber allem, was mit Computern und Internet zu tun hat. ( Die neue Fritzbox funktioniert noch nicht einwandfrei. )
Die bessere Lösung für mich könnte sein, zwei Speedports zum Laufen zu bringen, dann kann ich beim nächsten Problem leichter erkennen, was / wo das Problem ist. Ich bin mir immer noch nicht 100% sicher, dass mein Problem nur der Router ist/war, obwohl es bei weitem am wahrscheinlichsten ist. Es könnte aber auch eine seltsame Interaktion mit meinem VPN sein, die etwas im Speedport durcheinander gebracht hat. - Ein paar Mal, als Internet und Telefon zuvor einige Stunden abwesend waren, hatte ich den Verdacht, dass es nach dem Ausschalten eines Computers, der damals über VPN verbunden war, wieder aufkam war. Aber ich konnte mir damals nicht sicher sein.

Mal schauen was meine Wochenende experimentieren bringt. Ich habe noch ein paar Tage Zeit, um vom 14-tägigen Vertrag Widerrufs Recht Gebrauch zu machen, denk ich. - damit noch nicht alles verloren ist

Alan


Just testing ….
Nur testen ….

Danke für die Antwort und Meinung Hardwaremensch, vielleicht haben sie Recht. Im Dschungel dessen, was ich geschrieben habe, habe ich schon erwähnt, dass ich bereits einen neuen Router bei der Telekom miete, aber ich denke, ich würde gerne noch eine Weile versuchen, den Speedport als Hintergrundprojekt zum Laufen zu bringen, bevor ich aufgebe, aus den Gründen, die ich schon erwähnt habe.

Ich habe gestern die original Speedport und Auftrag papierkram von 2011 gefunden in meine Dachboden. Dort gibt es viele Informationen, einschließlich verschiedener Informationen zur ursprüngliche Einstellungen und Einrichtung usw. In den nächsten Tagen werde ich das durchlesen und meine allgemeinen internen Recherchen als Hintergrundprojekt fortsetzen.

In den Original papierkram wird erwähnt, dass die Ersteinrichtung zwischen einer bestimmten Zeit an einem bestimmten Tag erfolgen musste, die in diesem Originalstapel von papierkram angegeben hatten. Ich bin mir der Bedeutung dessen nicht sicher. Eventuell könnte ich nochmal versuchen, Hilfe von der Telekom zu bekommen. Telekom scheinen meinen letzten fragen zu ignorieren. Verständlich denke ich. Ein Autoverkäufer ist nicht so daran interessiert, bei der Reparatur Ihres alten Autos zu helfen, besonders nachdem er Ihnen ein neues verkauft ( vermietet in meine fall ) hat!

Ich habe zu Letzt gesehen, dass der Router ein kleines Loch hat, in das ich einen Stift stecken kann, möglicherweise um eine Art Werkseinstellungen wiederherstellen durchzuführen.
Das klingt nach einer drastischen Maßnahme. Ich werde das wahrscheinlich versuchen als letztes, aber ich werde warten, bis ich versucht habe, ein paar weitere Ideen zu bekommen oder mich ein bisschen besser informiert zu haben.

Alan









Danke, Hardwaremensch, dass Du versucht hast, mir (wieder) etwas vernunft einreden, :)
Ich werde sicherlich bedenken, was Du sagst, aber es ist nicht ganz richtig zu sagen, dass ich versuchst auf Biegen und Brechen einen alten Router zum Laufen zu bringen. Ich war nie besonders daran interessiert, es zu reparieren, und ich war seit letztem Samstag nicht mehr in der Nähe eines Routers.
Ich hatte diese Woche nicht viel Zeit für Computer oder Internet. Alles, was ich zu meinem Problem getan habe, war, ein paar Beiträge zu schreiben, ein wenig zu lesen und ich habe ein paar Speedport W504Vs und W723Vs gekauft.
Ich habe sie nur gekauft, weil sie so unglaublich günstig waren,- die Netzteile und das LAN-Kabel sind mehr wert, als ich dafür bezahlt habe. (Es sind viele Kabel und Anschlüsse in dem, was ich gekauft habe, enthalten. Ich bin mitten in einer langfristigen großen Hausrenovierung, die einen großen Computerraum beinhalten soll. Selbst wenn ich alle Router wegwerfe, kann ich das machen gute Verwendung der anderen Kleinigkeiten.)

Ich habe bereits erklärt, dass es für meine zukünftige Arbeit nützlich sein könnte, die Internetsysteme zu verstehen, die ich habe, die ich hatte und die ich haben könnte.


Letzten Samstag habe ich die Fritzbox angeschlossen gelassen. Die paar Male, die ich auf dem Computer war, hat das Internet funktioniert, also sieht es so aus, als ob die Fritzbox ständig funktioniert. Das Surfen im Internet scheint etwas langsam zu laufen, verglichen mit dem, was ich vorher immer vor meinen letzten Problemen hatte. Aber vielleicht ist das nur Zufall und liegt an etwas anderem als der Fritzbox.

Ich werde auf jeden Fall am Wochenende experimentieren, wenn ich Zeit habe, und mich melden, wenn ich neue Erkenntnisse habe.
Zum Beispiel habe ich jetzt eine neue und zwei vorher normal funktionierende 504Vs. Wenn ich also keine davon bekomme, um mir Internet zu verschaffen, dann weiß ich mit einiger Sicherheit, dass die Antwort auf meine letzte Frage Nein ist. Selbst dann bekomme ich vielleicht noch mehr Einblick in warum / ob das Problem im Titel meines Threads - "Speedport W504V - kann nicht kommunizieren"


Ich erwarte nicht, dass die W723Vs in irgendeiner Hinsicht so gut sind wie die Fritzbox ist. Aber wieder einmal waren sie lächerlich billig, und ich denke, sie sollten in einem VDSL 50-System funktionieren, daher könnte es interessant sein zu sehen, wie sie funktionieren, nur zum Vergleich und meine Experimente. Wenn ich zum Beispiel Internet mit ihnen bekomme, haben sie möglicherweise das gleiche Problem wie die Problem Fritzbox mit einigen meiner Computer oder auch nicht. Das könnte mir helfen, herauszufinden, wo das Problem liegt.



Alan

Some extra notes in support of this Thread post:
https://www.dsl-forum.de/threads/251...l=1#post169630
Einige zusätzliche Hinweise zur Unterstützung dieses Thread-Beitrags:
https://www.dsl-forum.de/threads/251...l=1#post169630


Kopien einiger der fehlenden Frageposts, bzw fehlenden Thread .. ( https://www.dsl-forum.de/threads/251...line-verbunden )

Copy of the final complete answer
Kopie der endgültigen vollständigen Antwort

---

---

Hi
Ich habe jetzt Antworten auf alle Fragen aus diesem Thread.. ( https://www.dsl-forum.de/threads/251...line-verbunden )

____(i) Die Antwort auf ... antwortet nicht auf 192.168.2.1 oder https://speedport.ip in der Adressleiste … die Hauptfrage des Thread-Titels war, dass die Software, die für den Einstieg in die Einstellung über einen Browser verantwortlich war, seit lange, einschließlich der Zeit, als der Speedport W504V noch recht aktuell war, nicht funktionierte. Die meisten alten /sehr alten Browser funktionieren. Ich habe dies vermisst, da mir am Telefon von Leuten, die mir halfen, geraten wurde, einen neueren Computer und Browser zu verwenden. Dies ist für die meisten Dinge der beste Rat, aber nicht in diesem speziellen Fall.
Die ganze Geschichte hier:
https://telekomhilft.telekom.de/t5/G...n/td-p/5370149

---

Ein paar andere Dinge nebenbei, auch die für andere besprochene Dinge relevant sind
__ (ii) Mein neuer Ersatz-Router (FRITZ!Box 7290) funktioniert auf einigen älteren Computern nicht: Antwort: Reduzieren Sie das Router-WLAN-Passwort auf 16 Stellen und ändern Sie das Router-WLAN-Sicherheitsding von WPA2 (CCMP) auf WPA + WPA2, um dieses Problem zu beheben
Die ganze Geschichte hier:
https://eileenslounge.com/viewtopic.php?f=21&t=37237

__(iii) Deutsche Telekom Zugangsdaten und t-online.de E-Mail-Anomalien
Ich habe anfangs aus einem seltsamen Grund viel Zeit verschwendet:
Viele Hilfestellungen der Telekom sind automatisiert. Keine Überraschung da.
Was viele nicht wissen, auch die meisten Telekom-Mitarbeiter, mit denen ich gesprochen habe, ist, dass viele Dinge entweder nicht oder viel schlimmer, sehr irreführend und sprunghaft funktionieren, wenn Sie nicht bei einem bestimmten t-online.de Freemail-Konto eingeloggt sind . Viele Leute wie ich wussten nie, dass ich so einen Account habe. So einen Account wird von der Telekom für Sie gemacht haben. (Dies wurde Ihnen möglicherweise in einer frühen Mitteilung, als Sie zum ersten Mal Telekom-Kunde wurden, im Kleingedruckten mitgeteilt)
Die ganze Geschichte hier:
https://telekomhilft.telekom.de/t5/T.../true#M1392788

__(iv) Zugangsdaten?? Was ist das? So etwas habe ich noch nie gesehen, Kumpel
Dies hängt teilweise mit __(iii) zusammen.
Es gibt eine aktuelle, teil junge, Generation, die denkt, man steckt Dinge ein und sie werden sich selbst initialisieren usw. Dazu gehören mindestens die Hälfte der Telekom-Leute, mit denen ich gesprochen habe.- Wenn etwas nicht sofort funktioniert, werfen Sie es weg, es muss veraltet sein.
( Ich meine nicht besonders alte Geräte - ich stimme zu, dass mein alter Speedport wahrscheinlich weggeworfen / aktualisiert werden muss. Der Punkt, den ich hier ansprechen möchte, ist ein anderer.)
Beim ersten Versuch, meine neue FRITZ!Box 7290 zu benutzen, hat irgendwann eine automatische Initialisierung stattgefunden, und in meiner Unwissenheit habe ich einfach die Standardeinstellungen "empfohlen" akzeptiert und auf Weiter geklickt.
Wenn man dann in die Internet Zugangsdaten schaut.. sieht man keine. Nichts ist da. Alle Eingabefelder sind leer - Zugangsdaten?? Was ist das? So etwas habe ich noch nie gesehen, Kumpel. Ich habe nie gewusst, was Zugangsdaten sind, und die Hälfte der Leute bei der Telekom weiß es immer noch nicht. Der Schuld liegt an der Standardoption, die vermutlich alle diese Daten rein schreibt, und die neueren FRITZ!Box-Router verbergen es dann vor dir.

Nur um klar zu sein, was ich hier sagen will: Als ich das erste Mal die Fritzbox angeschlossen habe , hat ein automatischer Prozess gestartet und ich hatte ein funktionierendes Internet danach. Ich habe nichts außer Weiter geklickt.
Wenn ich dann in "--Internet -- Zugangsdaten --- "- nachgeschaut habe, dann sehe ich auch nach vielen Neustarts keine Einträge ( https://i.postimg.cc/Y0DysTJf/FRITZ-...aten-shown.jpg ).
Mein Laie vermute ist , dass die Fritzbox-Software Dir anzeigt, was Du manuell eingegeben hast. Wenn Du selbst nie etwas eingegeben haben, wird dort nie etwas angezeigt, auch wenn die fritzbox deine Zugangsdaten gespeichert hat.
Dies kann einem Laien helfen, die Informationen zu verbergen, worum es bei den Zugangsdaten geht: Anfangs dachte ich fälschlicherweise, dass eine Fritzbox keine Zugangsdaten braucht.
(Siehe auch hier für detailliertere Screenshots https://excelfox.com/forum/showthrea...ll=1#post15698 )

__(v) Mein größeres Hauptproblem des versagenden Internets.
Ich hatte das Gefühl, dass mein Problem nicht unbedingt mein Router war, und dass möglicherweise die geringeren Probleme, die ich seit dem neuen Vertrag und dem neuen Router hatte, einfach darin bestand, dass alles, was falsch war, einen geringeren Einfluss hat auf die neueres, leistungsfähigeres System. Wenn Du zum Beispiel Mist Benzin von deine örtlichen Tankstelle bekommen, damit deine älteres Auto nicht mehr anspringt, also kaufst Du ein neues Auto und es springt an. Also die Tankstelle sagt dir jetzt ist alles gut - dein altes Auto war das Problem.
Also habe ich den neuen Vertrag gekündigt und konnte aufgrund der Erkenntnisse aus _(iii) einen Techniker der Telekom zu mir nach Hause kommen lassen, um meine Anlage zu überprüfen. ( Dieses Hilfesystem läuft parallel zu anderen Hilfesystemen der Telekom, die meisten Leute in der Telekom wissen es nicht, und es läuft aus einem alten Vertrag mit einer privaten Firma - Eine private Telekommunikationsfirma wurde geschickt).
Der Techniker dachte, es sei mein alter Router, bis ich ihm erklärte ____(i)
Dann suchte er mit verschiedenen Testinstrumenten weiter.
Eine fehlerhafte Verbindung in einer Anschlussdose irgendwo wurde erkannt, ersetzt und mein Internet funktionierte wieder wie in den letzten 10 Jahren meist zuverlässig.

---

Nur als Interesse zum Schluss…
_ (vi) Ich habe die Gelegenheit genutzt, um ein paar Geschwindigkeiten (mit dem www.breitbandmessung.de-Zeug) zu überprüfen, sowohl in der VDSL 50 Vertragszeit als auch in DSL 16.000 RAM IP Vertragszeit.
Ich habe fast** nie einen Leistungsunterschied mit verschiedenen Routern bemerkt
In der VDSL 50 Vertragszeit hatte ich einen Download durchschnittlich 51 Mbit/s, Upload durchschnittlich 11 Mbit/s
In der Vertragslaufzeit von VDSL 50 kann es bei der Nutzung von Kabel-LAN statt WLAN zum Download um einige Mbit/s-Verbesserungen gekommen sein.
In der DSL 16.000 RAM IP Vertragszeit mag es bei meinem ältesten Router im Vergleich zu den anderen einen sehr geringen Leistungsabfall** gegeben haben, aber wenn überhaupt, dann nur ca. .5 Mbit/s im Upload.
In der DSL 16.000 RAM IP Vertragszeit hatte ich einen Download durchschnittlich 12 Mbit/s, Upload durchschnittlich 2 Mbit/s

---

Die Geschichte hat also ein Happy End. Ich ärgere mich ein wenig, dass ich so viel selbst machen musste, aber das ist meine Entscheidung, ich hätte es leicht haben können, das System durch das neuere ersetzen und das Gleiche in ein oder zwei Jahren tun, wenn/ falls die fehlerhaft Verbindung probleme wäre schlechter.
Aber ich habe ein bisschen gelernt.
Aufgrund meines angewachsenen Wissens wurde mir plötzlich klar, was mein Schwiegervater mir vor einigen Jahren gegeben hatte: Auf dem Dachboden fand ich die alte FRITZ!Box 3270, die er mir gegeben hatte. Ich konnte es manuell einrichten, und es funktioniert, um mich ins Internet zu bringen.
Ich bin also mit vielen Routern und dem Wissen, was man damit macht, gut eingedeckt.
(Ich werde in ein paar Wochen vielleicht wieder auf das bessere VDSL-System updaten, sobald ich überzeugt bin, dass mein derzeitiger Anschluss in Ordnung ist)

Gruß aus Hof
Alan

Macro coding for this Thread:
https://excelfox.com/forum/showthrea...ll=1#post15705

Code:

---

Option Explicit
Sub AutoNameFill() ' https://excelfox.com/forum/showthread.php/2766-Autofill-Text-if-Criteria-are-met
Rem 1 Worksheet info
Dim Ws1 As Worksheet: Set Ws1 = ThisWorkbook.Worksheets.Item(1)
Dim Lr As Long: Let Lr = Ws1.Range("A" & Ws1.Rows.Count & "").End(xlUp).Row
Rem original data in first two columns
Dim arrDta() As Variant: Let arrDta() = Ws1.Range("A4:B" & Lr & "").Value2 ' Data range into an array
Rem modifying the data in the array
Dim Rw As Long ' The data line at any time
Dim celVl As String, Nme As String ' the cell value in column 1 at any row , a name
    Do While Rw < Lr - 4 '    ----- Main outer loop for all data rows
        Do While InStr(1, celVl, "total", vbBinaryCompare) = 0 And celVl <> "Total"  '  This keeps us going until we hit a  total
        Let Rw = Rw + 1: Let celVl = arrDta(Rw, 1) ' next line : cell value in that line
            If celVl <> "" Then Let Nme = celVl ' this will store our current name if we have one
            If arrDta(Rw, 2) <> "" And InStr(1, arrDta(Rw, 2), "total", vbBinaryCompare) = 0 Then Let arrDta(Rw, 1) = Nme ' we put the name in if there is data in column 2 and not a  total  this will also get the  name total  entry but never mind
        Loop ' While InStr(1, celVal, "total", vbBinaryCompare) <> 0 '  This keeps us going until we hit a  total
    ' At this point we have reached  a  total  and so will be moving onto the next name section
    Let celVl = "" '  this clears the last  name total  entry
    Loop ' While Rw < (Lr-4)  ----- Main outer loop for all data rows

Rem Repasting out the modified data
 Ws1.Range("A4:B" & Lr & "").Value2 = arrDta()
End Sub

---

Copy from here https://www.excelforum.com/excel-pro...ml#post4545938

For help in this post
https://eileenslounge.com/viewtopic....289070#p289070

Yep Rob Bovey’s sledgehammer is the Doggy’s Nut‘s. Once again saved a lot of frustration. Just now my Immediate Window got “swallowed” and “eaten” as I moved over it whilst moving the position of my VB Editor Window. All I could do was open or close it after that. The problem was that on opening it, it took up all the entire space in the VB Editor but refused to let me reduce its size or move it in any of the ways that it usually is possible to do. ( So maybe the Immediate Window had sort of swallowed the VB Editor ?? ). In any case something had its knickers in a twist, and all the other ways to get the problem sorted had no effect !!

Following the instructions from Rob Bovey sorted it Out
Absolutely spiffing, Jolly Billy Ho! IMO

Alan

P.s. The thread is a bit Old so the exact steps may be a bit different..
Here is one ( almost) current example...
( Using Windows Vista )

_ 1) Close Excel ***
_ 2) Hit the Microsoft symbol bottom left
_ 3) Type in RegEdit in the small search Window
_ 4) Double click on the RegEdit which should now be offered in the larger window just above the Search Window
( _ 5)( At this point I got an “Administrator Rights” type window pop Up – So you might not get past here depending on your “rights” – I got past by just clicking OK in this pop Up ) )
_ 6) A big registry Window pops up – I navigate through HKEY_CURRENT_USER\Software\Microsoft\VBA\6.0\Commo n
_ 7) Now on the right side of the Registry, I see a Dock . I double click on Dock
_ 8) I have now an Edit Window. It has a large “Value:” Box full with Numbers and letters in it.
_ 9) I Highlight all those Numbers and delete them, ( All but 0000 should then vanish ) , then Hit OK
_ 10) – “Jolly Ruddy Spiffing Billy Merry Ho Wonks Bingo !!” . – On opening Excel I find if I hit Ctrl+G from the VB Editor ( Alt+11 ), my immediate Window appears at the bottom of the VB Editor, but I can drag it in and out of the VB Editor anywhere where I Jolly well like! :)

(*** Do not forget that Excel must be closed or it will not work )

RegEditDockingWonks.JPG http://i.imgur.com/V0qttoA.jpg https://i.postimg.cc/X7qkfYdG/Reg-Ed...king-Wonks.jpg
Attachment 494178
Attachment 3652
https://i.postimg.cc/X7qkfYdG/Reg-Ed...king-Wonks.jpg

P.P.s. May be this Thread could do with being in the Tips and Tutorials Sub Forum?

In support of this post:
https://www.eileenslounge.com/viewto...289526#p289526




http://www.excelforum.com/excel-prog...ml#post4315748
http://www.excelforum.com/excel-prog...ml#post4316662
http://www.mrexcel.com/forum/excel-q...xcel-file.html
http://www.excelforum.com/excel-prog...ing-excel.html
https://eileenslounge.com/viewtopic....222840#p222840
https://eileenslounge.com/viewtopic....226939#p226939
https://eileenslounge.com/viewtopic....241142#p241142
https://eileenslounge.com/viewtopic....246079#p246079
https://eileenslounge.com/viewtopic....247028#p247028
https://eileenslounge.com/viewtopic....241204#p241204
Range referencing with and without $s https://eileenslounge.com/viewtopic....241197#p241197
https://eileenslounge.com/viewtopic....271415#p271415

In support of this post:
https://www.eileenslounge.com/viewto...289526#p289526




http://www.excelforum.com/excel-prog...ml#post4315748
http://www.excelforum.com/excel-prog...ml#post4316662
http://www.mrexcel.com/forum/excel-q...xcel-file.html
http://www.excelforum.com/excel-prog...ing-excel.html
https://eileenslounge.com/viewtopic....222840#p222840
https://eileenslounge.com/viewtopic....226939#p226939
https://eileenslounge.com/viewtopic....241142#p241142
https://eileenslounge.com/viewtopic....246079#p246079
https://eileenslounge.com/viewtopic....247028#p247028
https://eileenslounge.com/viewtopic....241204#p241204
Range referencing with and without $s https://eileenslounge.com/viewtopic....241197#p241197
https://eileenslounge.com/viewtopic....271415#p271415

In support of this post
https://excelfox.com/forum/showthrea...ge51#post12783
The ps1 file, and also below the $WindowsSearch.Add_Click(

Code:

---

Share ‘ChrisSearchTweaks18-19July.ps1    https://app.box.com/s/cbs7go8i2tdxw4wguthgxcviecaxjn6b
iex ((New-Object System.Net.WebClient).DownloadString(' https://raw.githubusercontent.com/ChrisTitusTech/win10script/71609526b132f5cd7e3b9167779af60051a80912/win10debloat.ps1'))
















$windowssearch.Add_Click({
    Write-Host "Disabling Bing Search in Start Menu..."
    Set-ItemProperty -Path "HKCU:\Software\Microsoft\Windows\CurrentVersion\Search" -Name "BingSearchEnabled" -Type DWord -Value 0
    <#
    Write-Host "Disabling Cortana"
    Set-ItemProperty -Path "HKCU:\SOFTWARE\Microsoft\Windows\CurrentVersion\Search" -Name "CortanaConsent" -Type DWord -Value 0
    If (!(Test-Path "HKLM:\SOFTWARE\Policies\Microsoft\Windows\Windows Search")) {
        New-Item -Path "HKLM:\SOFTWARE\Policies\Microsoft\Windows\Windows Search" -Force | Out-Null
    }
    #>
    Write-Host "Hiding Search Box / Button..."
    Set-ItemProperty -Path "HKCU:\Software\Microsoft\Windows\CurrentVersion\Search" -Name "SearchboxTaskbarMode" -Type DWord -Value 0
 
    Write-Host "Removing Start Menu Tiles"
 
    Set-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -Value '<LayoutModificationTemplate xmlns:defaultlayout="http://schemas.microsoft.com/Start/2014/FullDefaultLayout" xmlns:start="http://schemas.microsoft.com/Start/2014/StartLayout" Version="1" xmlns="http://schemas.microsoft.com/Start/2014/LayoutModification">'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '  <LayoutOptions StartTileGroupCellWidth="6" />'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '  <DefaultLayoutOverride>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '    <StartLayoutCollection>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '      <defaultlayout:StartLayout GroupCellWidth="6" />'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '    </StartLayoutCollection>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '  </DefaultLayoutOverride>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '    <CustomTaskbarLayoutCollection>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '      <defaultlayout:TaskbarLayout>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '        <taskbar:TaskbarPinList>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '          <taskbar:UWA AppUserModelID="Microsoft.MicrosoftEdge_8wekyb3d8bbwe!MicrosoftEdge" />'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '          <taskbar:DesktopApp DesktopApplicationLinkPath="%APPDATA%\Microsoft\Windows\Start Menu\Programs\System Tools\File Explorer.lnk" />'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '        </taskbar:TaskbarPinList>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '      </defaultlayout:TaskbarLayout>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '    </CustomTaskbarLayoutCollection>'
    Add-Content -Path 'C:\Users\Default\AppData\Local\Microsoft\Windows\Shell\DefaultLayouts.xml' -value '</LayoutModificationTemplate>'
 
    $START_MENU_LAYOUT = @"
    <LayoutModificationTemplate xmlns:defaultlayout="http://schemas.microsoft.com/Start/2014/FullDefaultLayout" xmlns:start="http://schemas.microsoft.com/Start/2014/StartLayout" Version="1" xmlns:taskbar="http://schemas.microsoft.com/Start/2014/TaskbarLayout" xmlns="http://schemas.microsoft.com/Start/2014/LayoutModification">
        <LayoutOptions StartTileGroupCellWidth="6" />
        <DefaultLayoutOverride>
            <StartLayoutCollection>
                <defaultlayout:StartLayout GroupCellWidth="6" />
            </StartLayoutCollection>
        </DefaultLayoutOverride>
    </LayoutModificationTemplate>
"@
 
    $layoutFile="C:\Windows\StartMenuLayout.xml"
 
    #Delete layout file if it already exists
    If(Test-Path $layoutFile)
    {
        Remove-Item $layoutFile
    }
 
    #Creates the blank layout file
    $START_MENU_LAYOUT | Out-File $layoutFile -Encoding ASCII
 
    $regAliases = @("HKLM", "HKCU")
 
    #Assign the start layout and force it to apply with "LockedStartLayout" at both the machine and user level
    foreach ($regAlias in $regAliases){
        $basePath = $regAlias + ":\SOFTWARE\Policies\Microsoft\Windows"
        $keyPath = $basePath + "\Explorer"
        IF(!(Test-Path -Path $keyPath)) {
            New-Item -Path $basePath -Name "Explorer"
        }
        Set-ItemProperty -Path $keyPath -Name "LockedStartLayout" -Value 1
        Set-ItemProperty -Path $keyPath -Name "StartLayoutFile" -Value $layoutFile
    }
 
    #Restart Explorer, open the start menu (necessary to load the new layout), and give it a few seconds to process
    Stop-Process -name explorer
    Start-Sleep -s 5
    $wshell = New-Object -ComObject wscript.shell; $wshell.SendKeys('^{ESCAPE}')
    Start-Sleep -s 5
 
    #Enable the ability to pin items again by disabling "LockedStartLayout"
    foreach ($regAlias in $regAliases){
        $basePath = $regAlias + ":\SOFTWARE\Policies\Microsoft\Windows"
        $keyPath = $basePath + "\Explorer"
        Set-ItemProperty -Path $keyPath -Name "LockedStartLayout" -Value 0
   
    Write-Host "Search and Start Menu Tweaks Complete"
    } # This was missing 12 July 2021
})

---

Coding for these Threads
https://eileenslounge.com/viewtopic....290229#p290229
https://excelfox.com/forum/showthrea...otes-and-Tests

Code:

---

Option Explicit ' “Window"s is a name for a programming idea which might result in something we “see” as what we conceive as Windows. Manipulating of the actual “Windows” seems the key to pseudo “making my own” InputBox with range selection. Direct linked libraries (dll) are available to run as and when required, hence the wording of direct link: They are used as an efficient means to organise Microsoft’s software generally allowing different Applications to share smaller programs which are shipped as standard with the Microsoft Windows Operating system. They are however also available to programmers , programming the applications. They are usually contained in Folder with name similar to User 32. "API calls”: just means usually that you are using those things and related “Windows” concept-all gets gets bundled up in imprecise intimidating term API, for Application Programming interface
Public Declare Function APIsinUserDLL_MsgBox Lib "user32.dll" Alias "MessageBoxTimeoutA" (Optional ByVal hWnd As Long, Optional ByVal Prompt As String, Optional ByVal Title As String, Optional ByVal uType As Long, Optional ByVal wLanguageID As Long, Optional ByVal Delay_ms As Long) As Long
Private Sub WhatsInMyGlobies() '
Dim WndNumber As Long
APIsinUserDLL_MsgBox hWnd:=WndNumber, Prompt:="Using  DateSerial(2021, 12, 1)  inside VBA will give" & vbCr & vbLf & vbCr & DateSerial(2021, 12, 1), Title:="NonModalPopUpThingy", uType:=4, wLanguageID:=0, Delay_ms:=5000  ' ' The error will occur if I do not have a pro open so the MsgBox line will error at ProWb.Name
End Sub
Sub MessinMitdates()
Rem 1 Attempt to get the  sShortDate  from registry via DateSerial( ) implification way
On Error GoTo Bed
Dim TestDateSerial As String
 Let TestDateSerial = DateSerial(9, 3, 4) '    DateSerial(year, month, day)  https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/dateserial-function
'  By experimenting, it appears that for the day and month, if the  sShortDate  in the registry needs more than one character then a zero is added to that retuned by  DateSerial(9, 3, 4)  For the  year  any missing  characters seem to be relplaced by  a  0  2  or  1  - For this reason I don't use  1  or  2  for the  day  or  month  becuse if i do , there may be some wrong determination below: We use the number to determine if we have a  day  or  month  or  year
    If InStr(1, TestDateSerial, "9", vbBinaryCompare) = 0 Then MsgBox Prompt:="You have no Year in your short date format": Exit Sub
    If InStr(1, TestDateSerial, "3", vbBinaryCompare) = 0 Then MsgBox Prompt:="You have no Month number in your short date format": Exit Sub
    If InStr(1, TestDateSerial, "4", vbBinaryCompare) = 0 Then MsgBox Prompt:="You have no Day number in your short date format": Exit Sub
Dim C As Variant ' This is each character. It can be a number or letter, so I used  Variant  but string would work also
Dim Cnt As Long: Let Cnt = 1
 Let C = Mid(TestDateSerial, Cnt, 1) ' =========  start of returned string
    Do While IsNumeric(C) = True
    Let Cnt = Cnt + 1  ' we are counting through the characters, (numbers), from the start,  while we have a number. So we are counting the first number section
    Let C = Mid(TestDateSerial, Cnt, 1)
    Loop '  While IsNumeric(C) = True
Dim Cnt1 As Long: Let Cnt1 = Cnt - 1 ' this will be the count of the characters ( numbers ) in the first number section
'  =============================================
Dim Sep1 As String
    Do While IsNumeric(C) = False
    Let Sep1 = Sep1 & C            '  In the first seperator
    Let Cnt = Cnt + 1 ' we are counting through the character in the thing used as the first seperator. (These should not be numbers)
    Let C = Mid(TestDateSerial, Cnt, 1)
    Loop ' While IsNumeric(C) = False
Dim DMY As String ' At this point we have reached the end of the first seperator,
' the next lines search the numbers in the first number section to determine if they are a  day  or  month  or  year
    If InStr(1, Left(TestDateSerial, Cnt - 1), "4", vbBinaryCompare) <> 0 Then: Let DMY = "d"  ' we are actually looking at the first number and first seperator, but never ming
    If InStr(1, Left(TestDateSerial, Cnt - 1), "3", vbBinaryCompare) <> 0 Then Let DMY = "m"
    If InStr(1, Left(TestDateSerial, Cnt - 1), "9", vbBinaryCompare) <> 0 Then Let DMY = "y"
Dim sShortDate As String ' the next line gives us a character string where the fist numbers are replaced by characters representing if they are a  day  or  month  or year
 Let sShortDate = Evaluate("=REPT(""" & DMY & """," & Cnt1 & ")") & Sep1 ' =======  make first bit of output ==
' =====  xx & sep1  ******************************************
Dim Pos2 As Long ' ============================================================================================
Let Pos2 = Len(sShortDate) + 1 '  This should be the position where the second number section starts
    Do While IsNumeric(C) = True
    Let Cnt = Cnt + 1 ' we are counting the characters ( numbers ) in the second ( middle ) character ( number ) section
    Let C = Mid(TestDateSerial, Cnt, 1)
    Loop
Dim Cnt2 As Long: Let Cnt2 = Cnt - Pos2 ' this will be the count of the characters ( numbers ) in the second ( middle )  number section
'  ==========================  at first character in second seperator ========================================
Dim Sep2 As String
    Do While IsNumeric(C) = False
    Let Sep2 = Sep2 & C  '
    Let Cnt = Cnt + 1 ' we are counting through the characters making up the second seperator
    Let C = Mid(TestDateSerial, Cnt, 1)
    Loop ' While IsNumeric(C) = False
'  the  Cnt    C    counting stops at the  start of the last number section
    ' the next lines search the numbers in the second ( middle)  number section to determine if they are a  day  or  month  or  year
'  at this point we have  got the second  seperator string,  Sep2  and are at the start of the last number ===
    If InStr(1, Mid(TestDateSerial, Pos2, Cnt2), "4", vbBinaryCompare) <> 0 Then: Let DMY = "d" ' we are looking in the middle number section
    If InStr(1, Mid(TestDateSerial, Pos2, Cnt2), "3", vbBinaryCompare) <> 0 Then Let DMY = "m"
    If InStr(1, Mid(TestDateSerial, Pos2, Cnt2), "9", vbBinaryCompare) <> 0 Then Let DMY = "y"
  Let sShortDate = sShortDate & Evaluate("=REPT(""" & DMY & """," & Cnt2 & ")") & Sep2 ' this adds to the  sShortDate  string  the characters to indicate the  type ( day month or year )  of the middle section numbers  and the second seperator
'  ==== xx & Sep1 & yy & Sep2  *******************************************
Dim Pos3 As Long: Let Pos3 = Len(sShortDate) + 1 ' this should be the start position of the last number section
Dim Cnt3 As Long        '
 Let Cnt3 = Len(TestDateSerial) - Pos3 + 1 ' this should be the number of characters ( numbers ) in the last number section
 ' we don't bother to loop through the last number section
    ' the next lines search the numbers in the third ( last )  number section to determine if they are a  day  or  month  or  year
    If InStr(1, Mid(TestDateSerial, Pos3, Cnt3), "4", vbBinaryCompare) <> 0 Then: Let DMY = "d"  ' we look from the start  of the last number section,  Pos3  , for a length of its count of its  characters ,  Cnt3
    If InStr(1, Mid(TestDateSerial, Pos3, Cnt3), "3", vbBinaryCompare) <> 0 Then Let DMY = "m"
    If InStr(1, Mid(TestDateSerial, Pos3, Cnt3), "9", vbBinaryCompare) <> 0 Then Let DMY = "y"
 Let sShortDate = sShortDate & Evaluate("=REPT(""" & DMY & """," & Cnt3 & ")") ' finally we add the characters representing the characters to indicate the  type ( day month or year )  of the last section
' ===== xx & Sep1 & yy & Sep2 & zzz  *************************************************************************
' =============================================================================================================
GoTo Rem2
Bed: ' Error handling code section for if the above coding errored
Let sShortDate = "Error getting  sShortDate"
On Error GoTo -1
Rem2: ' Rem 2 Some other computer and user info
On Error Resume Next ' In case info below  is somehow protected
Dim UsrNme As String: Let UsrNme = Application.UserName: Let UsrNme = Environ("username")
Dim CmprNme As String: Let CmprNme = Environ("computername")
Dim WOS As String: Let WOS = Environ("OS")
Dim VersXl As String: Let VersXl = " ( " & ExcelVersion & " ) "
On Error GoTo 0
Rem 3 Shift a space for some info, and some formating
    With Worksheets("Dates")
    .Range("A1:B15").Insert , shift:=xlShiftDown
    .Range("A1:B15").Clear
    .Columns("A").Font.Size = 12
    .Columns("A").ColumnWidth = 16
    .Columns("B").Font.Size = 8
    .Columns("B").ColumnWidth = 190
    End With
   
    With Worksheets("Dates").Range("A1:B1000")
    .Item(1).Value = "  " & UsrNme & "      " & Format(Now(), "dddd, dd, mmm, yyyy.        ") & Format(Now(), "hh") & "hr " & Right(Format(Now(), "hh mm"), 2) & "min" & "      " & VersXl
    .Item(3).Value = sShortDate: .Item(4).Value = " <----  " & CmprNme & "    Registry sShortDate"
    .Item(5).Value = DateSerial(2021, 12, 1): .Item(6).Value = "DateSerial(2021, 12, 1) for 1st dec 2021 was assigned to  .Value  of virgin cell. The  .Value  of the cell is returned as  " & .Item(5).Value & "  The  .Value2  is returned as  " & .Item(5).Value2 & ""
    .Item(7).NumberFormat = "m/d/yyyy"
    .Item(7).Value = DateSerial(2021, 12, 1): .Item(8) = "DateSerial(2021, 12, 1) for 1st Dec 2021 was assigned to  .Value  of cell formated in Short Date, using    .NumberFormat = ""m/d/yyyy""      The  .Value  of the cell is " & .Item(7).Value & "  The  .Value2  is  " & .Item(7).Value2 & ""
    .Item(7).NumberFormat = "m/d/yyyy"
    .Item(9).NumberFormat = "@"
    .Item(9).Value = DateSerial(2021, 12, 1): .Item(10) = "DateSerial(2021, 12, 1) for 1st Dec 2021 was assigned to  .Value  of cell formated in Text, using    .NumberFormat = ""@""  The  .Value  of the cell is " & .Item(9).Value & "  The  .Value2  is  " & .Item(9).Value2 & ""
    .Item(9).NumberFormat = "@"
    Dim DteSerial As String: Let DteSerial = DateSerial(2021, 12, 1)
    .Item(11).Value = DteSerial: .Item(12).Value = "I have not done anything to the format of the cell, its a virgin cell, but I first put what came from  DateSerial(2021, 12, 1)  into a string variable,  DteSerial , and then asigned that string variable to the cell  .Value  The  .Value  of the cell is " & .Item(11).Value & "  The  .Value2  is  " & .Item(11).Value2 & ""
    .Item(13).NumberFormat = "m/d/yyyy"
    .Item(13).Value = DteSerial: .Item(14).Value = "The cell is formattted as short date format using  .NumberFormat = ""m/d/yyyy""  I am assigning the filled variable  Dteserial  to it.  The  .Value  of the cell is " & .Item(13).Value & " the  .Value2  is " & .Item(13).Value2 & ""
    .Item(13).NumberFormat = "m/d/yyyy"
   
    ' Say in a self cancelling meassage box what the  DateSerial(2021, 12, 1)  returns in VBA
    Dim WndNumber As Long:
    APIsinUserDLL_MsgBox hWnd:=WndNumber, Prompt:="Using  DateSerial(2021, 12, 1)  inside VBA will give" & vbCr & vbLf & vbCr & DateSerial(2021, 12, 1), Title:="This will close itself after a few seconds", uType:=4, wLanguageID:=0, Delay_ms:=4000  ' ' The error will occur if I do not have a pro open so the MsgBox line will error at ProWb.Name
    DoEvents: DoEvents
    .Item(17).Value2 = 44531: .Item(17).NumberFormat = "m/d/yyyy": .Item(18).Value = "a  .Value2  of  44531(this is the Excel number for 1stDec,2021)  was put in a virgin cell, which then was given the cell format of Short Date, using    .NumberFormat = ""m/d/yyyy"" "
    .Item(19).Value2 = 44531: .Item(19).NumberFormat = "m\/d\/yyyy": .Item(20).Value = "a  .Value2  of  44531  was put in a virgin cell, which then was given the cell format of    .NumberFormat = ""m\/d\/yyyy"" "
    .Item(21).Value = Format("12    1 2021", "dd_mm_yyyy"): .Item(22).Value = "For a virgin cell I assigned like this  .Item(21).Value = Format(""12    1 2021"", ""dd_mm_yyyy"")    The  .Value frtom the cell is  " & .Item(21).Value & " and the  .Value2  is " & .Item(21).Value2 & ""
    .Item(23).Value = Format(#12/1/2021#, "dd_mm_yyyy"): .Item(24).Value = "For a virgin cell I tried to assign this  .Item(23).Value = Format(#12  - 1  .2021#, ""dd_mm_yyyy"") m  When I hit  Enter  I did not get any error, but that was changed to  Format(#12/1/2021#, ""dd_mm_yyyy"")  What seems to be happeming there is that Excel tries to coerce the string inside a  # pair  into the standard English American format. So it sees  #12/1/2021#  as December 1st, 2021  and gives me the date in the format I ask for.  The  .Value from the cell is " & .Item(23).Value & "  and the  .Value2  is " & .Item(23).Value2 & ""
    .Item(25).Value = Format(#12/1/2021#, "m/d/yyyy"): .Item(26).Value = "For a virgin cell I assigned .Item(25).Value = Format(#12/1/2021#, ""m/d/yyyy"")  The  .Value from the cell is " & .Item(25).Value & " and the  .Value2  is " & .Item(25).Value2 & ""
    .Item(27).Value = Format(#12/1/2021#, "m\/d\/yyyy"): .Item(28).Value = "For a virgin cell I assigned .Item(27).Value = Format(#12/1/2021#, ""m\/d\/yyyy"")  The  .Value from the cell is " & .Item(27).Value & " and the  .Value2  is " & .Item(27).Value2 & ""
    End With
'______________________________________________________________________________________________________________

ThisWorkbook.Save

End Sub
' From Rory's A Tool
Public Function ExcelVersion() As String
    Dim temp                  As String
    'On Error Resume Next
#If Mac Then
    Select Case CLng(Val(Application.Version))
        Case 11: temp = "Excel 2004"
        Case 12: temp = "Excel 2008" ' this should NEVER happen!
        Case 14: temp = "Excel 2011"
        Case 15: temp = "Excel 2016 (Mac)"
        Case Else: temp = "Unknown"
    End Select
#Else
    Select Case CLng(Val(Application.Version))
        Case 9: temp = "Excel 2000"
        Case 10: temp = "Excel 2002"
        Case 11: temp = "Excel 2003"
        Case 12: temp = "Excel 2007"
        Case 14: temp = "Excel 2010"
        Case 15: temp = "Excel 2013"
        Case 16: temp = "Excel 2016, 2019 0r 365 (Windows)"
        Case Else: temp = "Unknown"
    End Select
#End If
#If Win64 Then
    temp = temp & " 64 bit"
#Else
    temp = temp & " 32 bit"
#End If
 Let ExcelVersion = temp
End Function

---