-
Posts
10,527 -
Joined
-
Last visited
Content Type
Forums
News
20th
EduGeek EDIT Conference
Blogs
Everything posted by mac_shinobi
-
Back near the end of 2008 when I got my first car ( 1997 honda civic 1.4 L petrol ), paid for the car, using my phone went on confused.com did a car insurance quote for it and found that Elephant were the cheapest and called them up said Ive got this car, about to drive it home and need to pay for insurance fully comp. Did it on the spot and was allowed to drive it back myself, may be worth while finding out who is going to be the cheapest for you and call them up and make sure you are ok to do what I did, am guessing so, as long as you do it before attempting to drive back.
-
@Arthur / @Steve21 or anyone else Using version 2 of powershell at work but am going to attempt to install version 3 on my laptop ( not sure if it will work or not due to restrictions possibly ) I have the below script but want it converting to powershell const HKEY_CURRENT_USER = &H80000001 const HKEY_LOCAL_MACHINE = &H80000002 Const ForReading = 1, ForWriting = 2, ForAppending = 8 strComputer = "." Set StdOut = WScript.StdOut Dim username, asset, hdd, manuhdd Dim colIPResults, objFile, objFSO, objNIC, objWMI, objWSHNetwork, strAddresses, strIPAddress, strWQL, strComp, osVer Dim strRAM dim filesys, filetxt dim newfolder Dim usbPath Dim spVer Dim strSerial, strModel, strVendor, strNumModel Set objNetwork = CreateObject("Wscript.Network") Set filesys = CreateObject("Scripting.FileSystemObject") username = objNetwork.username strComputer = objNetwork.ComputerName usbPath = Replace(WScript.ScriptFullName, WScript.ScriptName, "") Sub DestroyObjects() If IsObject(objWMI) Then Set objWMI = Nothing If IsObject(objWSHNetwork) Then Set objWSHNetwork = Nothing End Sub Dim strMAC Set objWSHNetwork = CreateObject("WScript.Network") Set objWMI = GetObject("WinMGMTS:root\cimv2") strWQL = "SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = 'True'" Set colIPResults = objWMI.ExecQuery(strWQL) For Each objNIC In colIPResults For Each strIPAddress in objNIC.IPAddress If strAddresses = "" Then strAddresses = strIPAddress Else strAddresses = strAddresses End If Next strMAC = objNIC.MACAddress Next 'IPAddress 'Set objWMIService = GetObject("WinMGMTS:root\cimv2") 'Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled=True",,48) 'For Each objItem in colItems ' strMAC = objItem.MACAddress 'Next If strAddresses ="0.0.0.0" Or strAddresses ="" or strAddresses = "undefined" Then strAddresses = "No Connection Detected or invalid ip address" Else strAddresses = strAddresses End If DestroyObjects() 'Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 'Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystem",,48) 'For Each Item In colItems 'manu = Item.Manufacturer ' model = Item.Model 'Next Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystemProduct",,48) For Each objItem in colItems Select Case objItem.Vendor Case "Dell Inc.": strSerial = objItem.IdentifyingNumber strModel = objItem.Name strVendor = objItem.Vendor strNumModel = objItem.Version If strNumModel = "" Or IsNull(strNumModel)=true Then strNumModel = "N/A" End If Case "LENOVO": strSerial = objItem.IdentifyingNumber strNumModel = objItem.Name strVendor = objItem.Vendor strModel = objItem.Version End Select Next Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PhysicalMemory", "WQL", wbemFlagReturnImmediately + wbemFlagForwardOnly) totalMemory = 0 For Each item In colItems totalMemory = totalMemory + item.Capacity / (1024^2) Next strRam = FormatNumber((totalMemory / 1024), 2) & " Gb" 'Set colItems = objWMIService.ExecQuery("Select * from Win32_BIOS") 'For Each objItem in colItems ' serial = objItem.SerialNumber 'Next Set colItems = objWMIService.ExecQuery("Select * from Win32_SystemEnclosure") For Each objItem in colItems If Len(objItem.SMBIOSAssetTag) <= 0 Then asset = "N/A" Else asset = objItem.SMBIOSAssetTag End If Next Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv") strKeyPath = "HARDWARE\DESCRIPTION\System\CentralProcessor\0" strValue = "ProcessorNameString" objRegistry.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValue,strScriptStatus Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colDisks = objWMIService.ExecQuery("select * from Win32_DiskDrive where Name like '%PHYSICALDRIVE0%'") For Each objDisk in colDisks hdd = ConvertSize(objDisk.Size) manuhdd = Int(objDisk.Size /(1000000000)) & " GB" Next Set oWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set QueryWMI = oWMI.ExecQuery("SELECT * FROM Win32_OperatingSystem") For Each oItem In QueryWMI spVer = oItem.Caption & " with Service Pack " & oItem.ServicePackMajorVersion osVer = oItem.Version Next Set filetxt = filesys.OpenTextFile(usbPath & "\" & ucase(username) & " - " & Trim(strComputer) & ".htm" , 2, True) 'filetxt.WriteLine "Username,Manufacturer,Serial Number,Model,Computer Name,RAM,HDD,Asset Tag,Processor" 'filetxt.WriteLine ucase(username) & "," & manu & "," & serial & "," & model & "," & strComputer & "," & strRAM & "," & hdd & "( " & manuhdd & " )" & "," & asset & "," & strScriptStatus filetxt.WriteLine "Computer Spec for : " & strComputer & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Username :" filetxt.WriteLine "" & ucase(username) & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Operating System & Service Pack Level :" filetxt.WriteLine "" & spVer & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Operating System Version :" filetxt.WriteLine "" & osVer & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Manufacturer :" filetxt.WriteLine "" & strVendor & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Serial Number :" filetxt.WriteLine "" & strSerial & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Numerical Model :" filetxt.WriteLine "" & strNumModel & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Model Name :" filetxt.WriteLine "" & strModel & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Computer Name :" filetxt.WriteLine "" & strComputer & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "I.P Address :" filetxt.WriteLine "" & strAddresses & "" filetxt.WriteLine "" 'filetxt.WriteLine "" 'filetxt.WriteLine "MAC Address :" 'filetxt.WriteLine "" & strMAC & "" 'filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Total RAM :" filetxt.WriteLine "" & strRAM & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Actual HDD Capacity :" filetxt.WriteLine "" & HDD & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Manufacturer HDD Capacity :" filetxt.WriteLine "" & manuhdd & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Asset Tag :" filetxt.WriteLine "" & asset & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "Processor :" filetxt.WriteLine "" & Trim(strScriptStatus) & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "A.D Description :" filetxt.WriteLine "" & ProperCase(username) & space(1) & strModel & space(1) & "(" & strSerial & ")" & "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine "" filetxt.WriteLine " " filetxt.WriteLine "===========================================================" Dim ObjExec Dim strFromProc Dim strOutput 'output.innerhtml = "" Set objShell = CreateObject("WScript.Shell") Set ObjExec = objShell.Exec("%comspec% /c ipconfig /all 2>&1") Do strFromProc = ObjExec.StdOut.ReadLine() strOutput = strOutput & strFromProc & " " Loop While Not ObjExec.Stdout.atEndOfStream filetxt.WriteLine "" filetxt.WriteLine "" & strOutput & "" filetxt.WriteLine "" filetxt.Close msgbox ucase(username) & vbcrlf & spVer & vbcrlf & osVer & vbcrlf & strVendor & vbcrlf & strModel & " ( " & strNumModel & " ) " & vbcrlf & strSerial & vbcrlf & asset & vbcrlf & vbcrlf & strComputer & vbcrlf & strAddresses & vbcrlf & strScriptStatus & vbcrlf & strRAM & vbcrlf & hdd & "( " & manuhdd & " )" & vbcrlf & ProperCase(username) & space(2) & strModel & space(2) & "(" & strSerial & ")" wscript.sleep 1000 Function ConvertSize(Size) Do While InStr(Size,",") 'Remove commas from size CommaLocate = InStr(Size,",") Size = Mid(Size,1,CommaLocate - 1) & _ Mid(Size,CommaLocate + 1,Len(Size) - CommaLocate) Loop Suffix = " Bytes" If Size >= 1024 Then suffix = " KB" If Size >= 1048576 Then suffix = " MB" If Size >= 1073741824 Then suffix = " GB" If Size >= 1099511627776 Then suffix = " TB" Select Case Suffix Case " KB" Size = Round(Size / 1024, 1) Case " MB" Size = Round(Size / 1048576, 1) Case " GB" Size = Round(Size / 1073741824, 1) Case " TB" Size = Round(Size / 1099511627776, 1) End Select ConvertSize = Size & Suffix End Function Function ProperCase(sText) '*** Converts text to proper case e.g. ***' '*** surname = Surname ***' '*** o'connor = O'Connor ***' Dim a, iLen, bSpace, tmpX, tmpFull iLen = Len(sText) For a = 1 To iLen If a <> 1 Then 'just to make sure 1st character is upper and the rest lower' If bSpace = True Then tmpX = UCase(mid(sText,a,1)) bSpace = False Else tmpX=LCase(mid(sText,a,1)) If tmpX = " " Or tmpX = "'" Or tmpX ="." Then bSpace = True End if Else tmpX = UCase(mid(sText,a,1)) End if tmpFull = tmpFull & tmpX Next ProperCase = tmpFull End Function Set objMemory = Nothing Set objWMIService = Nothing Thank you
-
I think it is in relation to the circuitry that steps up the voltage / ampage to power the screen and possibly some circuitry on the screen itself as had a Lenovo Engineer blow both and had to replace the system board and the screen a 2nd time around ( at which point he removed all power sources prior to doing any work on the laptop ) and ensured that all connectors were seated firmly On the Lenovo screens they have some very sticky tape to keep the cable / display cable on the back of the screen connected firmly into the connector on the actual back of the screen edit - may be worth while disconnecting all conections relating to the display cable etc and ensuring that they are all seated firmly and stay in place with some strong sticky tape or the likes ??
-
Not saying that you did or did not remove all power sources before swapping the screens over but just to confirm did you remove both the battery and mains power cable before doing any screen swapping on the laptop , as per here : Laptop Replacement Screens: Packard Bell Easynote NEW90, NEW95, MS2273, MS2285, PAWF7, PEW91, P5WS0 Screen Replacement If you left the battery installed whilst swapping the screen over you may have done some damage to some of the component .....
-
map network drive to NAS but get error 64 or 58
mac_shinobi replied to mrstrong's topic in Windows 7
Just wanted to add those settings relate to smb signing from what I am aware of on either the client or server os or both - some articles http://support.exinda.com/topic/how-to-disable-smb-signing-on-windows-servers-to-improve-smb-performance http://blogs.technet.com/b/josebda/archive/2010/12/01/the-basics-of-smb-signing-covering-both-smb1-and-smb2.aspx http://www.petri.co.il/how-to-disable-smb-2-on-windows-vista-or-server-2008.htm -
Thinking about it more if the driver from the cd ( that is supposedly included with the network card ) should at least get it connected at which point you can update the drivers from the internet
-
Must get ffaaaasstterrrr Internetz !! So anyone flying to Japan / Korea or wherever that has a decent Internet Connection
-
That's a good one - nice and simple / concise to understand Thanks @plexer
-
I would be interested in how the VHD Access Switch works to allow the different virtual machines / servers to access there relevant virtual hard drives stored on the SMB Share / File Server or is it just like vmware fusion etc where you have a profile for each virtual machine / server and in that profile it has the config ie which virtual hard drive said virtual machine uses and it points to the relevant VHD ??
-
For the exam I would have put A for the answer however I would have done the same as @MatthewL with regards to downloading the latest from the relevant manufacturers website be it Intel / Marvel Yukon / Broadcomm or whoever. Some computers now generally have more then one NIC ( wired and wireless ) so could possibly use one NIC to connect to the internet ( so the wireless card ) instead of the Physical LAN connection ?? As it states there is no internet connection or connectivity on the one computer then I would use another computer to download the driver, transfer it to a storage device ( usb memory stick / external hard drive or if need be burn it to a cd ) so I could use it on the computer that needed the driver installing. Also with Windows 7 - it generally has a pretty good / extensive list of included drivers with the OS. Although there wasn't mention of what OS it is or was so am just guessing on the OS part
-
That's more like it - just a few things * Which physical server are the virtual servers running on ? * SMB Folder shares is that a SAN or NAS or something to that effect ? * VHD Access switch - what is this and what does it do / what is its purpose etc ? I thought VHD meant Virtual Hard Drive * DMZ Switch - Is this an actual switch that is configured to place certain servers / items into the DMZ ? * How come the smoothwall utm ( which deals with vpn / proxy / firewall etc ) has 2 connections into the DMZ Switch , they aggregated links or because said device deals with so many roles ie proxy / vpn / firewall etc so needs the extra connections ? I presume the smoothwall UTM deals with all the different roles so proxy / firewall / vpn etc
-
yes - excluding DC I'm not understand what the other abrievations mean and also can't see where the firewall sits and you have a number of things off of one branch ( presumably cable ) Was hoping for something a bit more detailed / in depth so I can see where you would connect the firewall to and what the proxy connects ie So Router from ISP --> firewall ( whether software or hardware ) --> proxy server --> VPN --> ?????
-
Is it possible someone could reply with a network layout diagram so I can see how the aforementioned items are supposed to connect together. Network diagram as per a google search but obviously not relevant to what I am after Stack Overflow Network Configuration « Blog – Stack Exchange
-
Not having done or dealt with it before I had no idea what it would have been called and hence what I needed to search for *shrugs* Hence the question which you kindly answered as per above - Thanks
-
never done that before - any links / guides on how you would do this ?
-
What is stopping the dhcp server from assigning an ip address from a different dhcp scope that is meant for a different VLAN / Subnet or whatever and what forces dhcp to only assign a particular VLAN or subnet with a specific ip address from that ip address range from the relevant dhcp scope and not an ip address from a different or another dhcp scope ??
-
Like apple say - there is an app for that ( Double Twist ) ?? With regards to droids and iTunes ? Although not sure why droid users would want to do that as they always moan about iTunes and apple etc /sarcasm
-
I could seriously use a network diagram so I can physically see how it connects together.... Also with regards to DHCP and DNS, how do they work together and keep each other updated so as not to have out of date info ie ComputerOne - assigned ip address info via dhcp, does dhcp update dns to reflect that ComputerOne has been given the address 1.1.1.1 Versus ComputerTwo - assigned ip address info via dhcp which is updated in dns to reflect it has 1.1.1.2 Also how does DHCP know to assign the computers in the Client VLAN the ip addresses within the Client IP Scope so if I had a dhcp scope in DHCP for the Client VLAN, how would you ensure that only the clients within the Client VLAN get these ip addresses ? So for example if I had an ip range of 1.1.1.2 all the way to 1.1.1.254 excluding loop back addresses and any others that can't be used, how would you get the Client VLAN to only get this dhcp range assigned to that vlan ?
-
I thought apple tv / airplay used bonjour, although not sure what they use to stream the audio / video as far as codec's, I presume h264 / mp4 or similar ?
-
Like one Shepherd said to the other, let's get the flock outta here !! That's another Baaa'd Joke
-
More global catalog servers and also how you promote the server as can be a domain controller or whatever else depending on the options you select etc , just guessing here ...
-
Not asking about your network setup - I just mean a general one so I can see what connects to what and why you connect those devices in that manner etc etc
-
Any chance of a network diagram so I can see whats connected to what. Also what is a UTM as you have that abbreviation a few times
-
Just a general question - not actually setting up a network etc but I just wanted to know Basically how would you setup and connect the network so that it is secure and what would connect to what for redundancy etc that includes the below items * Domain Controllers ( regardless of being PDC OR BDC although I know they have changed this recently ) so effectively print servers / file servers / email server(s) etc etc * Proxy Server * Firewall * VPN Solution * Internet Connection ( Router or BT Connection or whatever ) * Core Switches * Edge Switches Also why would you connect the above items in that manner or way ? @Arthur , @seawolf , @SYNACK
-
I passed my theory and hazard perception test first time , it was the practical that I failed first time and passed on the 2nd attempt. Basically 1) Didn't give right of way to on coming traffic when I had some cars etc on my side of the road ( even though I had enough time to get passed them before the other on coming traffic got any where near where I was 2) I did not brake before a curved slip road , I was always told to only brake when on a slip road and no mention of braking before it until after the test by which point it was too late as I had already failed I think there were a few other things ref the first test, then on the 2nd test I passed but I got a minor for not swapping lanes when I couldn't as no F*&^&*ker would let me onto the other lane even though I was indicating etc in plenty of time and also a minor for not going fast enough in the relevant areas ie driving at 50 mph instead of 60 mph in a 60 mph area ie A / B roads ie A428 / A509 etc Other than that, was just the manevours that I had to work hard at ie multi point turns, reversing around a corner, parallel parking etc etc
