pcte.ch News

Mit sogenannten Symlinks könnt ihr bei Windows Programme, Dateien oder Ordner an einem bestimmten Speicherort verschieben, und am alten (Installations) Ort eine System Weiterleitung einrichten.  Robert Schanze erklärt Ihnen in einem Beispiel, was Symlinks sind, wann ihr sie benötigt und wie ihr sie unter Windows erstellen und löschen könnt.

om cosmeticsLetzthin lieben gelernt: OM Cosmetics Produkte.

Es gibt sie noch, die qualitativ hochwertigen Produkte aus Schweizer Produktion.

Ich habe immer wieder das Problem, dass viele Cremen und Öle bei mir gereizte Haut, rötungen und Jucken verursachen.

Seit ich aber von OM Cosmetics (kleine Firma von Wetzikon) das Arganöl benutze habe ich keine "schlechte" Haut mehr. Halt einfach rein und sauber gemacht, ohne das ganze Chemie Zeugs.

Ich bin sehr zufrieden, darum werbe ich ausnahmsweise auch mal für etwas. mein Credo

Arganöl mit Jojoba und anderen ätherischen Ölen:

Das Marokkanisches Arganöl ist optimal für die Pflege aller Hauttypen, zusammen mit Jojobaöl auch perfekt für die Massage geeignet. https://yogasutra.ch/pages/inhaltsstoffe

Die ätherischen Öle der Latschenkiefer und des Rosmarins ergeben einen herrlichen, leicht herben Duft, Ylang Ylang und Lavendel runden die wunderbare Mischung ab.

'Kundenverwaltung.odb Modul Wartung
'Backup Texte
Const sTextBackupErfolgreich1 = "Backup erfolgreich gespeichert unter: "
Const sTextBackupErfolgreich2 = "gesichert"
Const sTextBackupErfolgreich3 = "Backupset Nummer "
Const sTextBackupErfolgreich4 = " von "
Const sTextBackupErfolgreich5 = " Sets "
Const sTextBackupErfolgreich6 = "Backup ausgeführt"

Kostenlos Strichcodes online erstellen

Lineare Barcodes, 2D Codes, GS1 DataBar, Postal Barcodes und viele mehr!

Dieser Online Barcode Generator zeigt die Einsatzmöglichkeiten der Strichcode-Komponenten im TBarCode SDK. Die einfache Verwendung dieses Barcode Generators in Ihren Anwendungen - z.B. in C# .NET, VB .NET, Microsoft® ASP.NET, ASP, PHP, C/C++, Delphi - ist sichergestellt. Testen Sie diesen Barcodegenerator ohne Softwareinstallation (Nutzungsbedingungen) und erzeugen Sie jetzt Ihre Barcodes: EAN, UPC, GS1, Code-128, QR-Code, Data Matrix, PDF417, Post-Barcodes, ISBN, etc.

Wie heißen die Hochzeitstage?

Tag der Trauung

Grüne Hochzeit
3/4 Jahr verheiratet Bierhochzeit
1 Jahr verheiratet Baumwoll- oder Papierhochzeit
3 Jahre verheiratet Leder- oder Weizenhochzeit
4 Jahre verheiratet Bernstein- oder Seidenhochzeit

5 Jahre verheiratet

Holzhochzeit
5 Jahre verheiratet (ohne Kinder) Ochsenhochzeit (scherzhaft)
6 Jahre verheiratet Zuckerhochzeit
6 1/4 Jahre verheiratet Hammelhochzeit
6 1/2 Jahre verheiratet Zinnhochzeit
7 Jahre verheiratet Kupferhochzeit
8 Jahre verheiratet Blech- oder Klatschmohnhochzeit
9 Jahre verheiratet Keramik- oder Weidenhochzeit
10 Jahre verheiratet Rosenhochzeit
11 Jahre verheiratet Fastnachts- oder Korallenhochzeit
12 Jahre verheiratet Nickel- oder Erdenhochzeit
12 1/2 Jahre verheiratet Petersilienhochzeit
13 Jahre verheiratet Maiglöckchenhochzeit
14 Jahre verheiratet Blaue Hochzeit
15 Jahre verheiratet Veilchen-,Glas-,Kristall- o. Flaschenhochzeit
16 Jahre verheiratet Saphirhochzeit
17 Jahre verheiratet Orchideenhochzeit
18 Jahre verheiratet Türkishochzeit
19 Jahre verheiratet Perlmutthochzeit
20 Jahre verheiratet Porzellan- oder Dornenhochzeit
25 Jahre verheiratet Silberne Hochzeit
30 Jahre verheiratet Perlenhochzeit
35 Jahre verheiratet Leinenhochzeit
37 1/2 Jahre verheiratet Aluminiumhochzeit
40 Jahre verheiratet Rubinhochzeit
45 Jahre verheiratet Messinghochzeit
50 Jahre verheiratet Goldene Hochzeit
55 Jahre verheiratet Juwelenhochzeit
60 Jahre verheiratet Diamantene Hochzeit
65 Jahre verheiratet Eisenhochzeit
67 1/2 Jahre verheiratet Steinhochzeit
70 Jahre verheiratet Gnaden- oder Platinhochzeit
75 Jahre verheiratet Kronjuwelenhochzeit
'Kundenverwaltung.odb Modul UCB
'Option explicit
Public oDocument
Public oDocInfo as object
Const SBMAXDIRCOUNT = 10
Dim CurDirMaxCount as Integer
Dim sDirArray(SBMAXDIRCOUNT-1) as String
Dim DirIndex As Integer
Dim iDirCount as Integer
Public bInterruptSearch as Boolean
Public NoArgs()as New com.sun.star.beans.PropertyValue

Irgendwann stolppert man immer darüber was für DNS Server im Router oder Modem gewählt werden soll.

Nun Ja, hier ein Artikel aus 2012 zu der Google Frage: Schnellster DNS Schweiz: http://www.ungefiltert-surfen.de/nameserver/ch.html

Falls sich Ihre als schnell beworbene Internetverbindung langsam anfühlt, kann das auch an einem DNS Problem liegen. Abhilfe bringt in manchen Fällen ein öffentlicher DNS Server wie Googles Public DNS - mittlerweile mit 70 Milliarden Anfragen täglich das größte DNS Service weltweit.

PilotEdit ist ein erweiterter Text- und Hex-Editor, der das Öffnen von Dateien mit mehr als 4 GB unterstützt.
Es bietet anpassbare Syntax- und Schlüsselwort-Hervorhebung, erweiterte Such- und Ersetzungsvorgänge, Dateivergleich und -zusammenführung, 256-Bit-AES-Verschlüsselung / Entschlüsselung und mehr.


Zusätzlich zu den Standard-Textbearbeitungsfunktionen unterstützt PilotEdit die automatische Textkodierung, Zeilensortierung, Suchen / Entfernen von duplizierten Zeilen, Zeichenkettensammlung und viele weitere erweiterte Funktionen.
Ein integrierter FTP-Client ermöglicht das Öffnen, Bearbeiten und Hochladen von Dateien direkt von / zu einem FTP-Server.

Empfohlen durch pcte.ch

'Kundenverwaltung.odb Modul SystemTools

sub  CloseDatabase (oEv as object)
    ' macro assigned to a button on a form to close openoffice
    Dim oSvc as object
    msgbox "      Closing OpenOffice" & chr$(10) & "           Goodbye......", 0, "  --WARNING--  "
    oSvc = createUnoService("com.sun.star.system.SystemShellExecute")
    ThisDatabaseDocument.close(true) ' >> close the internal file first
    ' pass the required parameters to execute a clean shutdown of soffice.exe
    wait 2000
    oSvc.execute("c:\windows\system32\taskkill.exe", " /F /IM soffice.exe /T" , 0) ' >> windows vista/7 syntax
End Sub

'Kundenverwaltung.odb MakeDocument

'Ein Beispiel, zum einbinden von Daten
' BASIC
Option Explicit
Dim oDocument as Object
Dim sDocumentTitle as String

Hier finden Sie eine Anleitung für E-Mail Links in HTML:

https://blog.kulturbanause.de/2012/01/e-mail-links-mailto-mit-betreff-kopie-cc-blindkopie-bcc-und-nachrichteninhalt/

'Kundenverwaltung.odb Modul Listboxen
Option Explicit
Dim OriginalList()
Dim oDialogModel as Object

Problem: Windows 10 Startmenü lässt sich plötzlich nicht öffnen, der Startknopf funktioniert.nicht. Auch die Kacheloberfläche, sowie das Info-Center lassen sich nicht öffnen.

Als Meldung bekommt man lediglich:
Schwerwiegender Fehler. Ihr Menü “Start” funktioniert nicht mehr. Wir beheben das Problem, sobald Sie sich erneut anmelden.

Leider wird auch durch das erneute Anmelden dieses Problem nicht behoben.
In diesem Artikel werden 2 Möglichkeiten erläutert zur Behebung von diesem lästigen Fehler.

'Kundenverwaltung.odb Modul Gimmicks
REM  *****  BASIC  *****

Ausführen-Dialog starten mit dem Shortcut [Windows] + [R]

Einen Windows Funktions-Check machen Sie ganz einfach über den Befehl: perfmon /report

Geprüft werden Systemdateien, Treiber, Hardware und auch Festplatten sowie auch SSD. Sie erhalten einen detaillierten Report welcher die Probleme auflistet. Die rot markierten Fehler sollten Sie prüfen,  typischerweise tauchen dort Konflikte mit Berechtigungen, Diensten oder Treiber auf.

'Kundenverwaltung.odb Modul Filter
REM  *****  BASIC  *****

'Felder Abfragen

SUB Unsichtbar(NameFormular AS STRING, NameSubFormular AS STRING, NameSubSubFormular AS STRING, NameFeld AS STRING)
    REM Felder, die nur zur Speicherung der ID-Werte in den Tabellen dienen, werden auf unsichtbar eingestellt
    DIM oForm AS OBJECT
    DIM oSubForm AS OBJECT
    DIM oSubSubForm AS OBJECT
    DIM oFeld AS OBJECT
    DIM oCtlView AS OBJECT
    oDoc=thisComponent
    oDrawpage=oDoc.Drawpage
    REM Lage des Feldes in dem entsprechenden Formular aufsuchen
    oForm=oDrawpage.Forms.getByName(NameFormular)
    IF NameSubFormular<>"" THEN
        oSubForm=oForm.getByName(NameSubFormular)
        IF NameSubSubFormular<>"" THEN
            oSubSubForm=oSubForm.getByName(NameSubSubFormular)
            oFeld=oSubSubForm.getByName(NameFeld)    
            ELSE oFeld=oSubForm.getByName(NameFeld)
        END IF    
        ELSE oFeld=oForm.getByName(NameFeld)
    END IF
    REM Zugreifen auf das Kontrollfeld und auf unsichtbar schalten
    oDocCrl = ThisComponent.getCurrentController()
    oCtlView = oDocCrl.GetControl(oFeld)
    oCtlView.Visible=false
END SUB

MxToolbox.com

https://mxtoolbox.com/SuperTool.aspx

Über das SuperTool! Von MxToolbox.com

Alle MX-Record-, DNS-, Blacklist- und SMTP-Diagnosen in einem integrierten Tool. Geben Sie einen Domainnamen oder eine IP-Adresse oder einen Hostnamen ein. Links in den Ergebnissen führen Sie zu anderen relevanten Tools und Informationen. Und Sie werden eine chronologische Geschichte Ihrer Ergebnisse haben.

Wenn Sie bereits genau wissen, was Sie wollen, können Sie einen bestimmten Test oder eine Suche erzwingen. Probieren Sie einige dieser Beispiele aus:

'Kundenverwaltung.odb Ansichten

'Kundenverwaltung.odb Modul Ansichten
REM Konstanten für Texte

Weiter