This is my oldest daughter and I...They are inducing her tonight and little Steiner Knox will be here before we know it...I am still not believing I'm a grandfather...especially since my other daughter is 7...still doing the Dad thing full time...
I am nowhere near an expert in this areas but before coming to a SMB, I worked in a huge enterprise with a petabyte+ of SAN storage and we had ESX VM's all over the place...there were some redundancy issues when it came to some SAN errors in the firmware but overall, ESX was pretty solid.
Here at my one man IT shop and thanks to ML's, I am set up on Hyper-V.
Update on yesterday's reboot. Here is what "WebRoot" said:
The particular issue being reported is related to a wireless keyboard being in place. There are a few Microsoft wireless keyboards that the drivers can conflict with ours, at this time the workaround sent would resolve this issue however a more permanent fix is being developed.
So my wireless keyboard was at fault. We changed a setting and now it is working. I'm very impressed with their support and expanding my testing of WebRoot. .
I've seen a couple of sites mentioned for training in the IT field.
I probably missed a ton though. What others are worth looking at?
This is the list so far (in alphabetical order):
Udemy is pretty good...they run sales often (if they are really "sales") and most of the purchased courses I've taken have been very good.
So it is official now...wonder what they can do in 6 episodes, if it won't be the "alien conspiracy" plot...
It's true...when winter weather is forecasted in Arkansas, we do get our bread and milk...I did so in shorts yesterday...a WINTER STORM WATCH and it was a nice 73 degrees yesterday.
This morning, WINTER STORM WARNING and 23 degrees...gotta love it!
I've been in theatre for 28 years (community level)...I've been in the kids ministry for 5 years (not ordained but as a volunteer and once as Interim Pastor as they searched for a new one.) I'm in front of the kids all the time and have done a few things in front of our congregation (large church)...last night, after this skit me and the kids pastor did (pictured), I was told I'd have to lead the congregation in a prayer...THAT, my friends, was so scary...not sure what it is about public prayer but to choose the words and lead 200-300 that were there last night, man I was scared but it went well...and I got to use my Surface Pro 3...:)
Looks like the topic ran away from me...been swamped with other things this past week...glad to see it made for good conversation.
I coined a phrase...Unreasonable FU's (Follow Up's) from Management...especially those who don't get IT. Tonight is no different.
By tomorrow morning, I've been asked to add some VBA code to an existing code block/module that saves a PDF in a file location...
When we chose a certain Macrom, it will save the Excel file as a PDF via a Macro...it creates the proper directory based upon Job Number and saves a PDF there through an aging (but functional) PDF creator program...(code below)...
Dim BackToSheet As Worksheet Const sDefaultCOPath As String = "z:\Change_Orders" Sub email_Selected() ' ' Email_Selected Macro ' Macro recorded 1/14/2015 by Brian ' ' Keyboard Shortcut: Ctrl+Shift+E ' ' Application.CommandBars("Stop Recording").Visible = False ' Application.Goto Reference:="email_Selected" '-- Do NOT Save Workbook because if they are in the emplate it can cause problems. ActiveWorkbook.Save Dim spdfname As String Dim sPDFNameDir As String Dim spdfpath As String Dim pos As Integer Set BackToSheet = ActiveWorkbook.ActiveSheet ' set current sheet so we can come back to it '-- First lets get the PDF File Name Sheets("Form").Select spdfname = Trim$(Cells(4, 3).Value) If Len(spdfname) = 0 Then Exit Sub ' nothing to print pos = InStr(spdfname, ".") 'test for an extension and remove if there If pos > 0 Then spdfname = Left$(spdfname, pos - 1) End If pos = InStr(spdfname, "-") 'test for an extension and remove if there If pos > 0 Then sPDFNameDir = Left$(spdfname, pos - 1) Else sPDFNameDir = spdfname End If Dim sMessageSubject As String, sMessageBody As String sMessageSubject = "Change Order - " & spdfname sMessageBody = "Change Order - " & spdfname & " has been attached for your review." spdfpath = sDefaultCOPath & Application.PathSeparator & sPDFNameDir & Application.PathSeparator 'Look for Directory and create it if it does not exist MakeDir (spdfpath) Call PrintToPDFandEMAIL(True, True, BackToSheet.Name, spdfname, spdfpath, , sMessageSubject, sMessageBody) ' Reactivate original sheet BackToSheet.Activate End Sub
I can get around VBA but often struggle in creating new code...how can I make it also save the file as an excel file in same directory? Is there just an easy line of code I can put in to prompt (or silently) save in the directory by this variable? sDefaultCOPath As String = "z:\Change_Orders"
So let's post our stories, opinions and photos of SpiceWorld 2022.
It was a smaller scale this year for sure but not distractingly so. We were on the opposite end of the convention center so some of the meeting rooms were smaller. The Vendor room seemed smaller but it may have just been the hall we were in.
The showroom closed down an hour before the party, so no cocktails and a place to hang out before going to party.
And the "drinks" showed 2 limit but don't think it was being enforced, especially with 4 stations.
The sessions were good but some where not on the subject you thought they would be.
But overall, it felt "normal"...
I need to set a default file path in VBA that will go to:
When this code is ran...
Option Explicit Public Sub ImagePicker() Dim sht As Worksheet, shp As Shape Dim file As String Dim fd As FileDialog Dim t As Single, l As Single, w As Single, h As Single ' get some images Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .AllowMultiSelect = False With .Filters .Clear .Add "Images", "*.ani;*.bmp;*.gif;*.ico;*.jpe;*.jpeg;*.jpg;*.pcx;*.png;*.psd;*.tga;*.tif;*.tiff;*.webp;*.wmf" End With If .Show = -1 Then file = .SelectedItems(1) End If End With 'change images on each sheets If Len(file) <> 0 Then For Each sht In ThisWorkbook.Sheets sht.Activate sht.Unprotect Set shp = sht.Shapes("logo") With shp t = .Top l = .Left w = .Width h = .Height .Delete End With sht.Pictures.Insert(file).Select With Selection .Name = "logo" .Top = t .Left = l .Width = w .Height = h End With sht.Protect Next End If Sheets(1).Activate End Sub
How do I put that in the code above? Thanks!
Well, on a whim, I went out to this location, plugged in a wireless adapter with the existing IP Info and bam, the camera server could see the TREE, GATE SWITCH and ultimately, the camera. So I guess next is to find out why this was the fix and narrow down on the permanent solution.
My unrealistic management said to get this up tonight but I only have access to the camera server which is not pinging the TREE device. So will work with what I've got for now.
You may need to bring out the big guns.
wiresharkon the camera server and record the network traffic to see what really happens.
If you've never used wireshark before, it will be a good opportunity to learn.
To me the symptoms does sound like a misconfigured subnet mask or something lacking a default gateway somewhere, as @scottalanmiller mentioned. But it could be something else too.
I'll get it installed...it is odd this worked for 2 weeks and then bam, stopped. And yet my laptop connected to the same network (when I am there) can go all the way to the camera.
I am remotely connected to the camera server now so will install Wireshark and will research how to use it in this case...I've used it a few times before.