Messages

176

General Software Discussion / Re: For the love of all that is holy stop the ctrl+MouseWheel text scaling - SOLVED

« on: February 15, 2021, 04:03 PM »

The problem is that I have a new logitech mouse, which has momentum on the scroll wheel, so essentially the scroll wheel sometimes keep moving in the direction i scroll it for a couple of seconds.

-mouser (February 15, 2021, 03:12 PM)

What's the model?

Just so I know never to buy it

177

Living Room / Re: Need hardware (and software) to reset power when internet connection is lost

« on: February 14, 2021, 03:50 PM »

The reason this is a problem anytime I'm not immediately available to spring into action is because I also keep my RasPi connected to at least one cryptocurrency peer-to-peer network in which I can be penalized or deemed less trustworthy if someone tries to connect to my device and it doesn't respond. It's not making me rich, but it's earning me a decent amount of money simply for keeping a device running/connected that I'm already leaving running/connected 24/7 anyway as my personal media server and whatnot.

-Deozaan (February 14, 2021, 02:10 AM)

You buried the lede. What is that, and how does it work? Maybe on a new thread. That sounds interesting...

-wraith808 (February 14, 2021, 02:23 PM)

Considering I have two RasPi 4B's on 24/7 running Docker services, (and spare 2B, 3B, & 3B+), I'm also interested in this.

178

Living Room / Re: Need hardware (and software) to reset power when internet connection is lost

« on: February 14, 2021, 03:42 PM »

I do have a soldering iron. I'm almost completely inexperienced with soldering, but I have replaced a couple of microswitches in my computer mice a few times. And I do have an old modem power supply which probably has the same rating as the current one, which I think I could cannibalize for this project. So it looks like that list includes just about everything I'd need, but wouldn't I also need some kind of breadboard wires (jumper cables?) for connecting the RasPi directly to the relay?

-Deozaan (February 14, 2021, 01:03 PM)

If you've got a soldering iron I'd order 2 or 3 of the transistors, (they're the only really temperature sensitive parts), just in case and a small protoboard instead of the breadboard.

Yes, you'll need a lead to plug onto the RasPi GPIO header, (I'd probably butcher an old IDE, SCSI, or floppy cable plug), but for simplicity a purpose made pack of leads is probably cheap enough.

Does the plug on the old PSU match the socket on the modem?
It needs to be a secure fit like the current PSU plug ... and then you need to find a matching socket.

Next time the modem needs a reboot can you take a good pic of the plug end on with a metric ruler for scale?

Actually, if the old PSU is still in working condition, has the same plug, and has the same voltage/current rating as the current one, it'll be easier to cut the cable and insert the relay board into it ... no socket required.

Jumper wires (10 pack)
Protoboard

179

Living Room / Re: Need hardware (and software) to reset power when internet connection is lost

« on: February 14, 2021, 05:55 AM »

Both of these look like perfectly reasonable solutions, and I think I could buy all the parts needed to make it for under $5, including shipping, on AliExpress. But I'll have to wait 1-2 months for them to arrive. Or even longer, since the order won't even be processed for another 1-2 weeks due to Lunar New Year celebrations halting virtually all business in China.

The cheapskate in me wants to do this method. But it's far enough out of my depth of knowledge that I'm not even sure I'm adding the right parts to my shopping cart. I'd hate to wait the 2 months for the parts to arrive only to realize that I got the wrong things or I can't get it to work.

-Deozaan (February 14, 2021, 02:10 AM)

Mouser Electronics, all in stock:
1k resistor
1N4007 diode
5V relay
BC548 transistor
Total: $3.41 + Postage

Plus a plug and socket to match the output lead of the existing modem PSU, (I'd usually just cannibalise something I have laying around ... got a lot of old modem/routers atm because of the big NBN upgrade).

If you haven't got a soldering iron, etc then a cheap solderless breadboard is $3.80, (that one seems to be big enough to take the relay).
NOTE: This needs checking, lead length on the relay is 3.6mm - the specs for the breadboard don't mention minimum lead length for components but if my breadboards are anything to go by that lead length might be a little on the short side.

If you're wondering why the change of transistor, (BC548 vs original BC547), the relay draws 106mA, the BC547 is rated to 100mA.  The BC548 chosen is rated for 200mA, a little safety margin against the transistor going blah. Base-Emitter and Emitter-Collector voltage is a little less but the diode is there to clamp the spike from the relay so should be OK.

I didn't know what a ZigBee was so I looked it up and it appears to just be a smart plug. I actually bought a smart plug recently, but it was a Christmas gift for someone else. I got a really good deal on it (only $1!) but I thought I'd never want to use one, because I didn't want it snooping on me and phoning home without my knowledge/consent. Do you happen to know if smart plugs in general, or the ZigBee specifically, snoop and phone home about stuff? I guess there's not much data that could be gathered from a smart plug, assuming it doesn't have a (potentially hidden) microphone or camera. I think the only things it could know about are just the times/schedule when it is on or off, and perhaps the name of my SSID and nearby SSIDs. But even so, I don't like the idea of internet-connected devices which report on me to their overlords (says the guy with multiple Android devices and multiple Windows 10 PCs in his household...).

ZigBee is a closed network system, it has no connection to the internet or any, (normal), WiFi interworking at all, it's low power, slow (250kbps), and intended for home automation, set and forget remote sensors, battery powered sensors, etc.
Maximum of 100m range LOS and capable of mesh working, ie. the clients don't need to all be within range of the host, they can relay messages from client to client until it gets to the intended client.

I have a couple of ZigBee plugs here that I can control through the Echo Plus, (it has an inbuilt ZigBee host).

I wouldn't be surprised if there was an Alexa Skill to monitor an internet connection and trigger a smart plug ... I should do a search.

180

Living Room / Re: Need hardware (and software) to reset power when internet connection is lost

« on: February 14, 2021, 01:03 AM »

and used a throwaway google account for the service,

-wraith808 (February 13, 2021, 09:40 PM)

Same here, there's a mention in the comments that someone was getting an error when trying to login, that was about 3 years ago.

Anyway, some Python I hacked together that might do the job on the RPi, (TestNet.py):

Code: Python [Select]

1. #!/bin/python
2.  
3. # python TestNet.py
4.  
5. # Power to load goes through relay NC (normally closed) contacts so relay
6. # doesn't have to be activated all the time
7.  
8. # sudo apt-get install python-requests
9.  
10. import datetime
11. import requests
12. import signal
13. import sys
14. import time
15. import RPi.GPIO as GPIO
16.  
17. def exit_handler(signum, frame):   # releases GPIO when you hit Ctrl-C to exit
18.   GPIO.cleanup()
19.   sys.exit(0)
20.  
21. signal.signal(signal.SIGINT, exit_handler) # Handle Ctrl-C
22.  
23. pinNum = 8                         # GPIO pin relay is activated on
24. GPIO.setmode(GPIO.BCM)             # numbering scheme that corresponds to breakout board and pin layout
25. GPIO.setup(pinNum, GPIO.OUT)       # replace pinNum with whatever pin you used, this sets up that pin as an output
26. url = "http://www.google.com"      # URL to test connection
27. timeout = 5                        # connection timeout in seconds
28. connected = 0                      # connection counter, incremented on failure
29. failNum = 4                        # number of consecutive failures before reboot
30. interval = 180                     # interval between connection attempts in seconds
31.  
32. while True:
33.   now = datetime.datetime.now()    # get the current date/time
34.   try:
35.     request = requests.get(url, timeout = timeout)  # connection attempt
36.     print(now.strftime("%Y%m%d-%H%M%S") + ': Connected to the Internet')
37.     connected = 0                  # reset counter on successful connection
38.   except (requests.ConnectionError, requests.Timeout) as exception:
39.     connected += 1                 # increment counter on connection failure
40.     print(now.strftime("%Y%m%d-%H%M%S") + ': No internet connection, failure: %s' % connected)
41.  
42.   if connected >= failNum:         # too many failures
43.     print (now.strftime("%Y%m%d-%H%M%S") + ': Rebooting modem')
44.     GPIO.output(pinNum, GPIO.HIGH) # output high, turn on relay
45.     time.sleep(30)                 # wait 30 seconds
46.     GPIO.output(pinNum, GPIO.LOW)  # output low, turn off relay
47. #    time.sleep(120)                # optional extra sleep period after a reboot, in case more time than normal interval required,  in seconds
48.  
49.   time.sleep(interval)             # sleep until next connection attempt

Sample output (you can comment out the print statements if output isn't required or redirect to null/file), this is before I added a timestamp to the output lines:

Code: Text [Select]

1. pi@raspberrypi:~ $ python ./TestNet.py
2. Connected to the Internet
3. Connected to the Internet
4. No internet connection, failure: 1
5. No internet connection, failure: 2
6. Connected to the Internet
7. Connected to the Internet
8. No internet connection, failure: 1
9. No internet connection, failure: 2
10. No internet connection, failure: 3
11. No internet connection, failure: 4
12. Rebooting modem
13. Connected to the Internet
14. Connected to the Internet

NOTE: Not tested with a relay connected but the GPIO commands are pretty basic so it should work, (plus it didn't blow up), using the same basic circuit as in the site I mentioned above.

181

Living Room / Re: Need hardware (and software) to reset power when internet connection is lost

« on: February 13, 2021, 04:28 PM »

https://shop.wireboot.com/

-wraith808 (February 13, 2021, 03:19 PM)

Another perspective with this device:
It depended on a server running under the control of the creator to set it up, (I don't even know if it's still running).
It was a Kickstarter project run by someone who apparently has a history of thinking up good ideas but then never fully follows through with them after an initial run. There are a ton of reports of people not receiving anything or that they didn't work properly.

Source: I had one and it's operation was "iffy".
https://www.kickstar...ically-rebo/comments
(As of 14 days ago there's still a comment about not receiving a product, the creator has not logged into Kickstarter for 14 months, and the project has never been updated from Pre-order - not updated since almost the time it was created.)

You could have had mine for free but I threw it out last year
I had the version with a 433MHz module for controlling respective power switches.

I was going to use it for when I'm overseas for 3-6 months at a time. In the end I set the computer up with a shutdown schedule, had it automatically boot on power on, and then used a timer switch to shut down the power to it and the modem for 15 mins every day at a time I wasn't likely to be using it.
It ran flawlessly this way for years.

Another alternative would be a ZigBee adapter for a RasPi along with a ZigBee controlled power switch, then you're not reliant on WiFi if it's provided by the modem/router.

Otherwise I would think an appropriately rated relay connected to the RasPi GPIO to switch the power to the modem would be easy enough.
eg. https://www.electron...-using-raspberry-pi/

Remember, you only need to switch the 12v DC, (usually), for the modem, not the 110v AC of the mains, so mains isolation is not a problem.
It should then be as simple as pinging Google every few minutes and triggering the GPIO on a run of 3 failures, (for example).

Also, you didn't mention, if your modem takes alternative firmware then maybe there's a facility in that to test/reboot.

182

Post New Requests Here / Re: IDEA: Pull icon from exe and put on the containing folder

« on: February 11, 2021, 03:56 PM »

I don't think the PowerShell one is working though(?)  I went with the "Send to" option.  It does open the PowerShell window, but nothing appears in the window, and it doesn't appear to do anything.

-kunkel321 (February 11, 2021, 09:20 AM)

Nothing appears in the window, it just writes the desktop.ini file into the directory.

Probably had to do what nod5 did and signal Windows to update.

Also, it seemed like IconResource was Vista only but maybe I read the MS docs wrong.

183

Post New Requests Here / Re: IDEA: Pull icon from exe and put on the containing folder

« on: February 10, 2021, 08:36 PM »

Using skwire's info, this should work if you go via Send To or the context menu if you add it in the registry ... can't test it, I'm sitting in a car 

Code: PowerShell [Select]

1. # FolIco.ps1
2.  
3. param (
4.   [Parameter(Mandatory = $true)][string]$file
5. )
6. $deskini = "$(Split-Path "$($file)" -Parent)\desktop.ini"
7. $ini = "[.ShellClassInfo]`nIconFile=`"$($file)`"`nIconIndex=0`n[ViewState]`nMode=`nVid=`nFolderType=Generic"
8. $ini | Out-File -LiteralPath "$($deskini)" -Force
9. (Get-Item -LiteralPath "$($deskini)").Attributes = 'Hidden'

Shortcut in the archive to put in C:\Users\<user>\AppData\Roaming\Microsoft\Windows\SendTo

184

Living Room / Re: Movies you've seen lately

« on: February 04, 2021, 08:29 PM »

Sputnik (2020)

At the height of the Cold War, a Soviet spacecraft crash lands after a mission gone awry, leaving the commander as its only survivor. After a renowned Russian psychologist is brought in to evaluate the commander's mental state, it becomes clear that something dangerous may have come back to Earth with him.

Slow moving story line, (well, the events of 2 weeks or so compressed into 2 hours), not heavy on action or SFX but I never found it boring, I think it moved at a good pace and I enjoyed it.

Russian cinematography always seems to look better than it's western counterpart, maybe it's the lack of over-reliance on CGI.

185

General Software Discussion / Re: Windows Explorer "File manager" Alternative

« on: February 04, 2021, 08:03 PM »

But I see I can get a portable version for $10.

-sphere (February 04, 2021, 04:07 PM)

Just to make it clear, the ability to have a portable installation is an extra AU$10 on top of DOpus' initial cost but AFAIAA it is a one time cost, (it carries across major updates without further payment), the same with the Advanced FTP functionality, (basic FTP is included in Pro).  Also, portable installations are priced on an individual basis, eg. if you want it on two USB drives it's 2 x AU$10.

BTW, it's been 4.5 years since DOpus v12 came out ... didn't realise I'd been using it that long.

186

Post New Requests Here / Re: Powershell Scripting : VBA adaptation code for locate strings inside word files

« on: February 04, 2021, 02:45 PM »

      $list = Get-ChildItem "$($srce)\*" -Include *.doc* -exclude ~*,*.mem.doc,~*,*.rey.doc,~*,*.CTF.doc,~*,*.anx.doc,~*,*.pry.doc,~*,*.PST.doc, -Recurse # Add more to exclude if necessary

I'll put in a few days the window I wish to deactivate and how I do throught the options in microsoft word.

-Contro (February 04, 2021, 12:19 PM)

Changes were already in original post, you only had to add more to exclude.

187

General Software Discussion / Re: Windows Explorer "File manager" Alternative

« on: February 04, 2021, 05:54 AM »

Not advocating DOpus one way or the other, (I've used it since my old Amiga days), just answering the various points.

1) DOpus can.
2) DOpus Duplicate Panel - filename with or without extension, size, filename + size, MD5 (with adjustable accuracy)
    CompareEx script
3) DOpus Find Panel
4) DOpus via Everything (SearchEverything: Getting Opus to work with Everything)
5) DOpus can call an external tool to do the job, (External Merge and Compare), I use it with Beyond Compare. EDIT: My mistake, I use Smart Beyond Compare and not External Merge and Compare.
6) DOpus Synchronize Panel (over the network via SMB, FTP, etc) (Advanced FTP functionality costs extra, SFTP, FTP/SSL, FTP/TLS)
7) Add tags automatically from where?  (Add metadata from filename) (Tagger3 script) There's quite a few threads on metadata in the DOpus Resource forum.
8) Pretty much the same as above.
9) DOpus has but it costs extra.

DOpus isn't cheap but you also don't have to update every time a new version comes out.  Major versions are updated every 3 years give or take, IIRC, you're licensed for all minor updates of a major version.

I doubt whether I use even 20% of what DOpus is capable of but I'm comfortable with it and I'm happy to support the developer.

188

Post New Requests Here / Re: Powershell Scripting : VBA adaptation code for locate strings inside word files

« on: February 03, 2021, 08:01 PM »

I am trying to determine if the supposed eml and pdf intercepted are because or not containing the string .doc in the description ....

-Contro (February 03, 2021, 11:43 AM)

That's not a description, it's a file name.  Use the Comment metadata for a description.

1. I need a filter to filter what types and names I want to process

-Contro (February 03, 2021, 01:30 PM)

See above:

Code: PowerShell [Select]

1. $list = Get-ChildItem "$($srce)\*" -Include *.doc,*.docx -exclude ~*,*.mem.doc -Recurse # Add more to exclude if necessary

Edit as necessary.

2. I would like too an option to manipulate the windows registry , specially if a window appear when opening the word file.

Code: PowerShell [Select]

1. ...
2.   $wdAlertsAll = -1         # All message boxes and alerts are displayed; errors are returned to the macro.
3.   $wdAlertsMessageBox = -2  # Only message boxes are displayed; errors are trapped and returned to the macro.
4.   $wdAlertsNone = 0         # No alerts or message boxes are displayed. If a macro encounters a message box, the default value is chosen and the macro continues.
5. ...
6.   $objWord.DisplayAlerts = $wdAlertsNone  # See values above
7. ...

Might work, might not.

189

Post New Requests Here / Re: VBA adaptation code for locate strings inside word files

« on: February 02, 2021, 08:47 PM »

You anticipate that you prefer Powershell.

-Contro (February 02, 2021, 06:04 PM)

I don't anticipate that I prefer PowerShell ...

I only use PowerShell.

190

Post New Requests Here / Re: VBA adaptation code for locate strings inside word files

« on: February 01, 2021, 11:10 PM »

Works for me with Word 2k3.

Code: PowerShell [Select]

1. <# This form was created using POSHGUI.com  a free online gui designer for PowerShell
2. .NAME
3.     Thing.ps1
4.  
5. .USAGE
6.     powershell path\to\Thing.ps1
7. #>
8.  
9. Add-Type -AssemblyName System.Windows.Forms
10. [System.Windows.Forms.Application]::EnableVisualStyles()
11.  
12. $Form                            = New-Object system.Windows.Forms.Form
13. $Form.ClientSize                 = New-Object System.Drawing.Point(400,224)
14. $Form.text                       = "Thing"
15. $Form.TopMost                    = $false
16.  
17. $Label1                          = New-Object system.Windows.Forms.Label
18. $Label1.text                     = "Folder"
19. $Label1.AutoSize                 = $true
20. $Label1.width                    = 25
21. $Label1.height                   = 10
22. $Label1.location                 = New-Object System.Drawing.Point(17,24)
23. $Label1.Font                     = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
24.  
25. $Label2                          = New-Object system.Windows.Forms.Label
26. $Label2.text                     = "Find"
27. $Label2.AutoSize                 = $true
28. $Label2.width                    = 25
29. $Label2.height                   = 10
30. $Label2.location                 = New-Object System.Drawing.Point(17,54)
31. $Label2.Font                     = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
32.  
33. $Label3                          = New-Object system.Windows.Forms.Label
34. $Label3.text                     = "Replace"
35. $Label3.AutoSize                 = $true
36. $Label3.width                    = 25
37. $Label3.height                   = 10
38. $Label3.location                 = New-Object System.Drawing.Point(17,83)
39. $Label3.Font                     = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
40.  
41. $TextBox1                        = New-Object system.Windows.Forms.TextBox
42. $TextBox1.multiline              = $false
43. $TextBox1.width                  = 257
44. $TextBox1.height                 = 20
45. $TextBox1.location               = New-Object System.Drawing.Point(82,20)
46. $TextBox1.Font                   = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
47.  
48. $TextBox2                        = New-Object system.Windows.Forms.TextBox
49. $TextBox2.multiline              = $false
50. $TextBox2.width                  = 257
51. $TextBox2.height                 = 20
52. $TextBox2.location               = New-Object System.Drawing.Point(82,48)
53. $TextBox2.Font                   = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
54.  
55. $TextBox3                        = New-Object system.Windows.Forms.TextBox
56. $TextBox3.multiline              = $false
57. $TextBox3.width                  = 257
58. $TextBox3.height                 = 20
59. $TextBox3.location               = New-Object System.Drawing.Point(82,76)
60. $TextBox3.Font                   = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
61.  
62. $Button1                         = New-Object system.Windows.Forms.Button
63. $Button1.text                    = "..."
64. $Button1.width                   = 34
65. $Button1.height                  = 18
66. $Button1.location                = New-Object System.Drawing.Point(353,20)
67. $Button1.Font                    = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
68.  
69. $Button2                         = New-Object system.Windows.Forms.Button
70. $Button2.text                    = "Start"
71. $Button2.width                   = 60
72. $Button2.height                  = 30
73. $Button2.location                = New-Object System.Drawing.Point(184,122)
74. $Button2.Font                    = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
75.  
76. $TextBox4                        = New-Object system.Windows.Forms.TextBox
77. $TextBox4.multiline              = $false
78. $TextBox4.width                  = 257
79. $TextBox4.height                 = 20
80. $TextBox4.location               = New-Object System.Drawing.Point(82,174)
81. $TextBox4.Font                   = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
82.  
83. $Form.controls.AddRange(@($Label1,$Label2,$Label3,$TextBox1,$TextBox2,$TextBox3,$Button1,$Button2,$TextBox4))
84.  
85. $Button1.Add_Click({
86.   $objForm = New-Object System.Windows.Forms.FolderBrowserDialog
87.   $objForm.Description = "Select folder containing files"
88.   $objForm.SelectedPath = [System.Environment+SpecialFolder]'MyComputer'
89.   $objForm.ShowNewFolderButton = $false
90.   $result = $objForm.ShowDialog()
91.   if ($result -eq "OK") {
92.     $TextBox1.Text = $objForm.SelectedPath
93.   } else {
94.     $TextBox1.Text = ""
95.   }
96. })
97.  
98. $Button2.Add_Click({
99.   if ($TextBox1.Text -ne '' -and $TextBox2.Text -ne '') {
100.     Start-ReplaceText $TextBox1.Text $TextBox2.Text $TextBox3.Text
101.   }
102. })
103.  
104.  
105. function Start-ReplaceText {
106.   param (
107.     [Parameter(Mandatory = $true)][string]$srce,
108.     [Parameter(Mandatory = $true)][string]$FindText,
109.     [Parameter(Mandatory = $true)][string]$ReplaceWith
110.   )
111.  
112.   $wdAlertsAll = -1         # All message boxes and alerts are displayed; errors are returned to the macro.
113.   $wdAlertsMessageBox = -2  # Only message boxes are displayed; errors are trapped and returned to the macro.
114.   $wdAlertsNone = 0         # No alerts or message boxes are displayed. If a macro encounters a message box, the default value is chosen and the macro continues.
115.  
116.   # Code below came from StackOverflow but I've lost the link
117.   $objWord = New-Object -comobject Word.Application
118.   $objWord.Visible = $false
119.   $objWord.DisplayAlerts = $wdAlertsNone  # See values above
120.  
121.   $list = Get-ChildItem "$($srce)\*" -Include *.doc,*.docx -exclude ~*,*.mem.doc -Recurse # Add more to exclude if necessary
122.   foreach($item in $list){
123.     $TextBox4.Text = "Doing file: $([System.io.Path]::GetFileName($item))"
124.     $objDoc = $objWord.Documents.Open($item.FullName, $true)
125.     $objSelection = $objWord.Selection
126.     $wdFindContinue = 1
127.     $MatchCase = $False
128.     $MatchWholeWord = $true
129.     $MatchWildCards = $False
130.     $MatchSoundsLike = $False
131.     $MatchAllWordForms = $False
132.     $Forward = $True
133.     $Wrap = $wdFindContinue
134.     $Format = $True
135. #    $wdReplaceNone = 0
136.     $wdFindContinue = 1
137.     $ReplaceAll = 2
138.  
139.     $a = $objSelection.Find.Execute($FindText, $MatchCase, $MatchWholeWord, $MatchWildCards, `
140.       $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap, $Format, $ReplaceWith, `
141.       $ReplaceAll)
142.  
143.     $objDoc.Save()
144.     $objDoc.Close()
145.   }
146.  
147.   $objWord.DisplayAlerts = $wdAlertsAll  # Turn alerts back on, see values above
148.   $objWord.Quit()
149.   $TextBox4.Text = 'Finished'
150. }
151.  
152.  
153. #Write your logic code here
154.  
155. [void]$Form.ShowDialog()

191

Easy Screencast Recorder / Re: capture audio from speaker instead of microphone

« on: January 30, 2021, 09:19 PM »

I would have thought any halfway decent screen capture software would be able to capture from the Stereo Mix audio device, I know ActivePresenter, (free version), does.

Only thing is you need to mute other sources via the Volume Mixer to ensure you don't get audio you don't want overlaying the audio you do want.

192

General Software Discussion / Re: a program to allow use of the optional tags displayed by windows explorer

« on: January 28, 2021, 02:45 AM »

Things like text files don't have metadata afaiaa, they use the ADS, (Alternate Data Stream), for storing things like comments.

This is reminiscent of one of your previous threads:
https://www.donation....msg383356#msg383356

193

General Software Discussion / Re: Multiple Find and replace in a word file

« on: January 27, 2021, 05:33 PM »

Code: Visual Basic [Select]

1. Sub FindAndReplaceMultiItems()
2.   Dim strFindText As String
3.   Dim strReplaceText As String
4.   Dim nSplitItem As Long
5.    
6.   Application.ScreenUpdating = False
7.  
8.   ' Enter items to be replaces and new ones.
9.  strFindText = InputBox("Enter items to be found here,seperated by | (vertical bar): ", "Items to be found")
10.   strReplaceText = InputBox("Enter new items here, seperated by | (vertical bar): ", "New items")
11.   nSplitItem = UBound(Split(strFindText, "|"))
12.  
13.   ' Find each item and replace it with new one respectively.
14.  For nSplitItem = 0 To nSplitItem
15.     With Selection
16.       .HomeKey Unit:=wdStory
17.       With Selection.Find
18.         .ClearFormatting
19.         .Replacement.ClearFormatting
20.         .Text = Split(strFindText, "|")(nSplitItem)
21.         .Replacement.Text = Split(strReplaceText, "|")(nSplitItem)
22.         .Format = False
23.         .MatchWholeWord = False
24.       End With
25.     Selection.Find.Execute Replace:=wdReplaceAll
26.   End With
27. Next nSplitItem
28.  
29.   Application.ScreenUpdating = True
30.  
31. End Sub

Try that, it uses | instead. (Not tested since I'm on a tablet.)

194

General Software Discussion / Re: Batch Word Text Replacer

« on: January 26, 2021, 06:49 PM »

I am doing something wrong.
No replaces at all.

-Contro (January 26, 2021, 10:03 AM)

That's because it looks for *.docx files by default, you need to change it to *.doc.
Changing it to *.doc? would probably do both types but I haven't tested it.

Code: Text [Select]

1. strFile = Dir(strFolder & "\" & "*.doc", vbNormal)

or

Code: Text [Select]

1. strFile = Dir(strFolder & "\" & "*.doc?", vbNormal)

195

General Software Discussion / Re: Batch Word Text Replacer

« on: January 25, 2021, 07:28 PM »

Ojú !!!!!!!!!! Then you don't have used datanumen .
I would prefer an advice if you are using this tool or know at first hand someone doing.

-Contro (January 24, 2021, 07:17 PM)

No problem ... however that VBA module is from 2017 and I've just tested it on Word 2003 and it worked ...

196

General Software Discussion / Re: Batch Word Text Replacer

« on: January 25, 2021, 02:25 AM »

You can give this a try:
https://www.datanume...iple-word-documents/

-4wd (January 24, 2021, 06:21 PM)

I am trying long time ago with this sort of program.
So : Have you try that script or the program ? Do you use this program ?

-Contro (January 24, 2021, 07:17 PM)

I don't have/use Word or VBA, if I did I'd probably use PowerShell interfacing to Word to do the same thing instead.

197

LaunchBar Commander / Re: Add Windows 10 programs (ex: Krita)

« on: January 25, 2021, 01:28 AM »

This method works for adding UWP apps: How to open UWP apps from the command line

198

General Software Discussion / Re: Batch Word Text Replacer

« on: January 24, 2021, 06:21 PM »

You can give this a try:
https://www.datanume...iple-word-documents/

199

General Software Discussion / Re: Speedtest of my Internet browsers :-(

« on: January 23, 2021, 08:04 PM »

I expect the problem is inside my computer, not in the network; We are 400 apartments, theoretically with the same wiring, but I am the only one complaining...

-Curt (January 23, 2021, 03:01 AM)

To start with I'd boot into Safe Mode with Networking, fire up Edge (or any browser with zero add-ons), and then do your speed test, (personally I'd use an ftp transfer but this is easier), so there'll be no extra background programs running.

If I'm following this right, (which is not normally the case as I get older ), you get 400Mbps on the computer, 800+Mbps on your phone (via WiFi) through the same router, modem, and ISP.

Your problem is more than likely your computer:

• You're running too much crap doing background networking.
• You're running crap extensions in your browsers.
• The network settings are seriously screwed up.
• etc, etc.

For the first, boot your computer, start Task Manager, switch to Performance tab, and select your network connection on the left - you should have close to zero data transfer, (or sub-100Kbps), if it's just idling along, (no updates or anything).
If it's high then it's time to start trying to find what's sucking data.

For the second, download the PortableApps version of Firefox and try that or start Firefox in Safe mode.

For the third ... you could try running the Network Troubleshooter, All Settings->Network & Internet->Network Troubleshooter.  If that appears to not help then it's time to get into the crap you normally don't want to

PS. It's Mbps not MBps, 1000 Mbps = 125 MBps 

200

Found Deals and Discounts / Netflix/Youtube Premium

« on: January 18, 2021, 04:34 AM »

OK, not really a deal as it were but more a method to save money, (this doesn't break any law in Australia but who knows what kind of messed up copyright is in your country).

Here's a Google spreadsheet with Netflix prices: Netflix Prices

The spreadsheet hasn't been updated since the last price hike, Netflix plans are now: AU$10.99, AU$15.99, & AU$19.99 for Basic, Standard, & Premium

But I currently get Premium for ~AU$7.30, (US$5.60), by signing up and paying on the Turkish site, a 63% saving.  (Argentina is currently the cheapest, Turkey was when I signed up.)

All you need is a free VPN with a exit node in Turkey ... and in case you're wondering all your content won't suddenly become Turkish in nature. The content is based on the location you log in from, I might pay in Turkish Lira but the content is all that's applicable to Australia.

Some info for signing up: Netflix via Turkey  (Just use the Netflix sign up information, not any services the site is selling)

The same thing can be done for Youtube Premium, here it's AU$14.99 Individual or AU$22.99 Family.

Paying in Argentine Pesos: ~AU$1.80 Individual or ~AU$2.75 Family.

Sign up via a VPN with an Argentine exit node, if it asks for an Argentine address see here.

FWIW, I've been paying in TKL for Netflix for over a year and only just signed up for Youtube Premium - I probably wouldn't have bothered with either of them if it was necessary to pay full price.

The above is via OzBargain: Netflix; Youtube Premium