Αρχείο συντάκτη Θεόδωρος Τασσόπουλος
Custom Query σε Custom Table WordPress
$datotal = $wpdb->get_results( $wpdb->prepare(“SELECT SUM(amount) as ‘Total_Payments’ FROM `aKBTF61_pms_payments` WHERE status = ‘completed'”)); echo $datotal[0]->Total_Payments;
Total User Count WordPress using Shortcode
To function παρακάτω δημιουργεί shortcode // Function to return user count function tcp_user_count() { $usercount = count_users(); $result = $usercount[‘total_users’]; return $result; } // Creating a shortcode to display user count add_shortcode(‘tuser_count’, ‘tcp_user_count’); Για page/post χρησιμοποιούμε το shortcode [tuser_count]. Για … Συνέχεια
Εξαγωγή των άρθρων με βάση την κατηγορία
SELECT DISTINCT post_title , concat(‘https://www.thewebsite.gr/’,post_name) ,(SELECT group_concat(wp_terms.name separator ‘, ‘) FROM wp_terms INNER JOIN wp_term_taxonomy on wp_terms.term_id = wp_term_taxonomy.term_id INNER JOIN wp_term_relationships wpr on wpr.term_taxonomy_id = wp_term_taxonomy.term_taxonomy_id WHERE taxonomy= ‘category’ and wp_posts.ID = wpr.object_id ) AS “Categories” FROM wp_posts WHERE … Συνέχεια
Μετατροπή όλων των πινάκων σε InnoDB από MyISAM
Το InnoDB είναι πιο γρήγορο για το wordpress. Εκτός αυτού είναι λιγότερο πιθανό να κρασάρουν πίνακες. SET @DATABASE_NAME = ‘name_of_your_db’; SELECT CONCAT(‘ALTER TABLE `’, table_name, ‘` ENGINE=InnoDB;’) AS sql_statements FROM information_schema.tables AS tb WHERE table_schema = @DATABASE_NAME AND `ENGINE` = … Συνέχεια
Ημερομηνία και ώρα ανανέωσης Δεδομένων
1. New Blank Query. 2. Advanced Editor let Source = #table(type table[Date Last Refreshed=datetime], {{DateTime.LocalNow()}}) in Source
Αποθήκευση των tabs σε διαφορετικό path με Macro
Οι καρτέλες αποθηκεύονται ως αυτοτελή excel. Οι τιμές των κελιών τους αποθηκεύονται ως values. Option Explicit Public Sub MISCSV() Dim wbkExport As Workbook Dim shtToExport As Worksheet Set shtToExport = ThisWorkbook.Worksheets(“mis”) Set wbkExport = Application.Workbooks.Add shtToExport.Copy Before:=wbkExport.Worksheets(wbkExport.Worksheets.Count) Application.DisplayAlerts = … Συνέχεια
Δημοσιεύθηκε στη Microsoft Excel
Σχολιάστε
Αποθήκευση σε διαφορετικό path με Macro
Sub SaveReportMIS() ActiveWorkbook.SaveCopyAs “Z:\BondsTest\BondsReport.xls” ActiveWorkbook.Save MsgBox “Saved” End Sub
Δημοσιεύθηκε στη Microsoft Excel
Σχολιάστε
Date Dimension Power bi
Dates = VAR CurrentDate = TODAY() RETURN ADDCOLUMNS ( CALENDAR( DATE( 1900; 1; 1); DATE( 2022; 12; 31 ) ); “Year”; YEAR([Date]); “Month in Year”; MONTH([Date]); “Month”; FORMAT([Date];”mmm”); “Quarter in Year”; QUARTER([Date]); “Quarter”; CONCATENATE(“Q”; QUARTER([Date]) ); “Month & Year Sort”; … Συνέχεια
Selected από φίλτρο Power BI
CALCULATE( MIN(TransactionsEBanking[Ημερομηνία]); ALLSELECTED(TransactionsEBanking[Ημερομηνία]) ) Change Date End = Var _endDate= Maxx(ALLSELECTED(‘Date'[Date Filer]),ENDOFMONTH(‘Date'[Date Filer])) Var _start_date= minx(ALLSELECTED(‘Date'[Date Filer]),’Date'[Date Filer])) return _endDate & ” ” & _start_date
Δημιουργία πίνακα on the fly για πιο εύκολο φιλτράρισμα αποτελεσμάτων.
Δημιουργία πίνακα on the fly για πιο εύκολο φιλτράρισμα αποτελεσμάτων. AllPresence = SELECTCOLUMNS(Presence; “name”;Presence[member_name];”presabs”;Presence[presence])
Υπολογισμός χρόνου σε DAX
— DATEDIFF computes the delta between two dates, using different units of measure — YEAFRAC returns the delta as a fraction (in years) EVALUATE VAR StartDate = DATE ( 2011, 01, 01 ) VAR EndDate = DATE ( 2012, 12, … Συνέχεια
Διόρθωση Flickering se Windows Forms με διάφανες εικόνες και background
Protected Overloads Overrides ReadOnly Property CreateParams() As CreateParams Get Dim cp As CreateParams = MyBase.CreateParams cp.ExStyle = cp.ExStyle Or 33554432 Return cp End Get End Property Private Sub PreVentFlicker() With Me .SetStyle(ControlStyles.OptimizedDoubleBuffer, True) .SetStyle(ControlStyles.UserPaint, True) .SetStyle(ControlStyles.AllPaintingInWmPaint, True) .UpdateStyles() End With … Συνέχεια
Μικρά χρήσιμα script
//Αλλάζει κείμενο σε div $(‘.cart-items’).text(response); //Επιστρέφει κείμενο στο success toastr.success(‘<?php echo site_phrase(‘added_to_the_cart’); ?>’); //Κλείνει το modal jQuery(‘#large-modal’).modal(“toggle”); //Κάνει update συγκεκριμένο div $(‘#cartinstoreright’).load(location.href+” #cartinstoreright>*”,””);;
If statement php σε μια γραμμή
<?php echo $row[‘status’] == 1 ? “checked” : “”; ?>
Repair XFS Filesystem error
xfs_repair /dev/md0 fsck /dev/md1 Check the file system and the re-install the bootloader Request the rescue-system and then a hardware-reset. Connect to the rescue system. Possible to mount the RAID? # mount /dev/md1 /mnt Yes. Do a file system check … Συνέχεια
Regular expression για e-mail validation
^ Για να δηλώσουμε την αρχή του string ([a-zA-Z0-9_\-\.]) – Το πρώτο block επιτρέπει όλα τα γράμματα, όλα τα νούμερα, την κάτω παύλα, την παύλα και την τελεία. @ – Για να κάνει validate το @ ([a-zA-Z0-9_\-\.]) – Το πρώτο … Συνέχεια
Hotel Booking Platform
Τον Ιανουάριο του 2019 ξεκίνησε η προσπάθεια δημιουργίας μιας πλατφόρμας για booking δωματίων ξενοδοχείων. Η πλατφόρμα βρίσκεται στο 80% της ολοκλήρωσής της και περιέχει περισσότερα από 120 χιλιάδες ξενοδοχεία. Σύντομα θα είναι διαθέσιμη στο κοινό.
Outlook B.M.S.
— 2024 – Version 3.1.0.8 Το Software έχει ολοκληρωθεί και τρέχει πιλοτικά σε 4 επιχειρήσεις. Έχουν προστεθεί πάρα πολλές λειτουργίες, συμπεριλαμβανομένης της ένωσης με το MyData. — 2020 – Version 1.0.1.18 Το Outlook B.M.S. ξεκίνησε το 2018 και αποτελεί … Συνέχεια
Πως προσθέτουμε τα μεταφορικά στο product.tpl στο Prestashop
Controllers/font/ProductController.php Προσθέτουμε αυτό. Όπου 172 το id του carrier. Το id αλλάζει κάθε φορά που γίνεται επεξεργασία κάποιο στοιχείο του. //tcp $default_carrier = new Carrier(172); $carrier_zones = $default_carrier->getZones(); if (isset($carrier_zones) && !empty($carrier_zones)) { $first_carrier_zone = $carrier_zones[0][1]; $delivery_price = $default_carrier->getDeliveryPriceByWeight($this->product->weight, 1); … Συνέχεια
Δημοσιεύθηκε στη Prestashop
Σχολιάστε
Δημιουργία συντόμευσης εικονιδίου για την Επιφάνεια Εργασίας στα Windows 10
Βάζουμε προορισμό: %windir%\explorer.exe shell:::{3080F90D-D7AD-11D9-BD98-0000947B0257} Εικονίδιο: %SystemRoot%\System32\imageres.dll
Πως κρατάμε αρχείο Mysql bin για όχι περισσότερο από 3 μέρες
Τα αρχεία logs (bins) της mysql πιάνουν πολύ χώρο. Είναι σχεδόν ολόκληρο το μέγεθος της βάσης για κάθε μέρα που κρατιούνται. Καλό είναι να υπάρχει ένα όριο ημερών για να μην γίνεται waste of resources. [mysqld] expire_logs_days=3
Πως αλλάζω background σε κλειδωμένο υπολογιστή εταιρείας
Σε command promt πατάμαε το παρακάτω path. %AppData%\Microsoft\Windows\Themes\ Αντικαθιστούμε τα αρχεία με την εικόνα που θέλουμε. Κάνουμε log off.
SELECT αυτά που δεν υπάρχουν σε συσχετισμένο table
Βρίσκουμε αυτά που δεν κάνουν match SELECT DISTINCT tags_to_news.tag_id, tags.name FROM `tags_to_news` LEFT OUTER JOIN tags ON tags.id = tags_to_news.tag_id WHERE tags.name IS NULL
Εισαγωγή γραμμής με identity μέσω κώδικα.
Μια από τις κλασικές χαζομάρες της Microsoft. Για να γίνει εισαγωγή id μέσω εντολής πρέπει να είναι κλειστό το ID PROTECTION. Πρέπει πρώτα να απενεργοποιηθεί, να οριστεί η στήλη στην εισαγωγή και έπειτα να ενεργοποιηθεί ξανά. SET IDENTITY_INSERT NewCustomers ON; … Συνέχεια
Πως αντιγράφουμε μόνο το κεντρικό κελί από group σε excel
Πολλές φορές πρέπει να αντιγράψουμε μόνο τις κεφαλίδες από grouped κελιά από το excel σε άλλο φύλλο. Για να το κάνουμε αυτό πρέπει να επιλέξουμε την περιοχή που θέλουμε και μετά πατάμε το Find and Select που φαίνεται στην εικόνα. … Συνέχεια
Δημοσιεύθηκε στη Microsoft Excel
Σχολιάστε
Πως σπάμε ένα μεγάλο αρχείο Excel με πολλές γραμμές σε πολλά αρχεία
Περνάμε στις μακροεντολές VB και την τρέχουμε. Sub DigiSpot() Dim wb As Workbook Dim ThisSheet As Worksheet Dim NumOfColumns As Integer Dim RangeToCopy As Range Dim WorkbookCounter As Integer Dim RowsInFile Dim Prefix As String Application.ScreenUpdating = False ‘Initialize data … Συνέχεια
Δημοσιεύθηκε στη Microsoft Excel
Σχολιάστε
SQL Server Σύνθετο Query από SELECT
–Πίνακας Στατιστικών σε περίοδο χρόνου με βάση τον Κωδικό Συναλλαγής. Επιστρέφει: Κωδικό Συναλλαγής, Περιγραφή Συναλλαγής, Πλήθος Συναλλαγών και Αξία Συναλλαγών SELECT b.transactionType_code AS ‘ΚΩΔΙΚΟΣ ΣΥΝΑΛΛΑΓΗΣ’, b.transactionType_name AS ‘ΠΕΡΙΓΡΑΦΗ ΣΥΝΑΛΛΑΓΗΣ’, CASE WHEN T.plithos IS NULL THEN 0 ELSE T.plithos END AS … Συνέχεια
Βασικές λειτουργίες του Excel
Από εκεί και πέρα =RIGHT(R25430;LEN(R25430)-FIND(“|FIRSTNAME=”;R25430)) Από εκεί και πριν =LEFT(BH25419;FIND(“|”;BH25419)-1) Match σε σχέση με μια στήλη. (Εάν Βρεις το Α12 στο Φύλλο TEO από την στήλη Β έως την στήλη ΑΑ τότε φέρε μου την 26η στήλη. Βολεύει σε search … Συνέχεια
Δημοσιεύθηκε στη Microsoft Excel
Σχολιάστε