2008.03.28 15:00 Astronomy
2017.06.08 22:01 x_Muzzler_x No Man's Sky Coordinate Exchange
2016.09.01 02:57 alcogiggles Astoria Queens and everything related.
2023.06.04 15:12 Chrillosnillo Found in a Swedish forest, a PCB surrounded by Styrofoam, looks like som electrical thing. The size of a chiabata. Located close to man made small pond. I was walking the dog. The day was hot.Latitude: 55° 31' 59.99" N Longitude: 12° 56' 60.00" E
![]() | submitted by Chrillosnillo to Whatisthis [link] [comments] |
2023.06.04 14:27 IsThisTakenOrThis [EXCEL] Calculating the distance between two latitude and longitude locations without a google API key
2023.06.04 12:31 tbaror Create worldmap or Geomap with Loki Geoip
- match: selector: '{job="syslog"}' stages: - regex: expression: '^(?PThe fields are looks as follows below in Grfana (Grafana v9.5.2) , i am trying to set worldmap or a geomap panel for username world connection but i cant set the it correctly
sum by (geoip_country_name) (count_over_time({job="syslog",user_name!=""} json geoip_country_name != "" [5m]))in the panel settings i got
Country Code (not found)Any idea how i should set it correctly , Please advice Thanks
2023.06.04 10:50 d1nd141 Own nginx scenario not working?
type: leaky #format: 2.0 debug: true name: nginx-own-singleevent description: "Detect bad strings" filter: 'evt.Meta.log_type in ["http_access-log", "http_error-log"] && (any(File("http_bad_strings.txt"), {Upper(evt.Parsed.request) contains Upper(#)}) any(File("http_bad_strings.txt"), {Upper(evt.Parsed.http_user_agent) contains Upper(#)}))' data: - source_url: https://xxxxxxxx dest_file: http_bad_strings.txt type: regexp strategy: LRU size: 40 ttl: 10s capacity: 1 leakspeed: 1s groupby: "evt.Meta.source_ip" blackhole: 2m labels: service: http type: scan remediation: true scope: type: own-nginxI know that the source_url is only fetched when deployed through cscli install. So i created the file http_bad_strings.txt manually.
parsers: - crowdsecurity/nginx-logs collections: - crowdsecurity/base-http-scenarios scenarios: - crowdsecurity/nginx-req-limit-exceeded - nginx-own-singleevent description: "nginx support : own rules" author: own tags: - linux - nginx - crawl - scanAn explain runs fine, i see my last logs, but the output does not show my own scenario:cscli explain -t nginx --file /valog/nginx/access.log --only-successful-parsers -v
line: 192.168.215.221 - - [04/Jun/2023:10:44:29 +0200] "GET /test HTTP/1.1" 404 153 "-" "curl/7.81.0" ├ s00-raw ├ 🟢 crowdsecurity/non-syslog (+5 ~8) ├ update evt.ExpectMode : %!s(int=0) -> 1 ├ update evt.Stage : -> s01-parse ├ update evt.Line.Raw : -> 192.168.215.221 - - [04/Jun/2023:10:44:29 +0200] "GET /test HTTP/1.1" 404 153 "-" "curl/7.81.0" ├ update evt.Line.Src : -> /valog/nginx/access.log ├ update evt.Line.Time : 0001-01-01 00:00:00 +0000 UTC -> 2023-06-04 08:50:47.263521938 +0000 UTC ├ create evt.Line.Labels.type : nginx ├ update evt.Line.Process : %!s(bool=false) -> true ├ update evt.Line.Module : -> file ├ create evt.Parsed.message : 192.168.215.221 - - [04/Jun/2023:10:44:29 +0200] "GET /test HTTP/1.1" 404 153 "-" "curl/7.81.0" ├ create evt.Parsed.program : nginx ├ update evt.Time : 0001-01-01 00:00:00 +0000 UTC -> 2023-06-04 08:50:47.269194313 +0000 UTC ├ create evt.Meta.datasource_path : /valog/nginx/access.log ├ create evt.Meta.datasource_type : file ├ s01-parse └ 🟢 crowdsecurity/nginx-logs (+22 ~2) └ update evt.Stage : s01-parse -> s02-enrich └ create evt.Parsed.body_bytes_sent : 153 └ create evt.Parsed.http_user_agent : curl/7.81.0 └ create evt.Parsed.status : 404 └ create evt.Parsed.proxy_alternative_upstream_name : └ create evt.Parsed.request : /test └ create evt.Parsed.target_fqdn : └ create evt.Parsed.verb : GET └ create evt.Parsed.http_version : 1.1 └ create evt.Parsed.proxy_upstream_name : └ create evt.Parsed.remote_addr : 192.168.215.221 └ create evt.Parsed.request_time : └ create evt.Parsed.time_local : 04/Jun/2023:10:44:29 +0200 └ create evt.Parsed.http_referer : - └ create evt.Parsed.remote_user : - └ create evt.Parsed.request_length : └ update evt.StrTime : -> 04/Jun/2023:10:44:29 +0200 └ create evt.Meta.http_verb : GET └ create evt.Meta.log_type : http_access-log └ create evt.Meta.source_ip : 192.168.215.221 └ create evt.Meta.http_path : /test └ create evt.Meta.http_status : 404 └ create evt.Meta.http_user_agent : curl/7.81.0 └ create evt.Meta.service : http ├ s02-enrich ├ 🟢 crowdsecurity/dateparse-enrich (+2 ~2) ├ create evt.Enriched.MarshaledTime : 2023-06-04T10:44:29+02:00 ├ update evt.Time : 2023-06-04 08:50:47.269194313 +0000 UTC -> 2023-06-04 10:44:29 +0200 CEST ├ update evt.MarshaledTime : -> 2023-06-04T10:44:29+02:00 ├ create evt.Meta.timestamp : 2023-06-04T10:44:29+02:00 ├ 🟢 crowdsecurity/geoip-enrich (+9) ├ create evt.Enriched.Longitude : 0.000000 ├ create evt.Enriched.ASNNumber : 0 ├ create evt.Enriched.ASNOrg : ├ create evt.Enriched.ASNumber : 0 ├ create evt.Enriched.IsInEU : false ├ create evt.Enriched.IsoCode : ├ create evt.Enriched.Latitude : 0.000000 ├ create evt.Meta.IsInEU : false ├ create evt.Meta.ASNNumber : 0 └ 🟢 crowdsecurity/http-logs (+7) └ create evt.Parsed.impact_completion : false └ create evt.Parsed.file_ext : └ create evt.Parsed.file_frag : test └ create evt.Parsed.file_name : test └ create evt.Parsed.file_dir : / └ create evt.Parsed.static_ressource : false └ create evt.Meta.http_args_len : 0 ├-------- parser success 🟢 ├ Scenarios ├ 🟢 crowdsecurity/http-crawl-non_statics └ 🟢 crowdsecurity/http-probingNo errors in crowdsec logs regarding my rules.
Acquisition Metrics: ╭────────────────────────────────┬────────────┬──────────────┬────────────────┬────────────────────────╮ │ Source │ Lines read │ Lines parsed │ Lines unparsed │ Lines poured to bucket │ ├────────────────────────────────┼────────────┼──────────────┼────────────────┼────────────────────────┤ │ file:/valog/nginx/access.log │ 3 │ 3 │ - │ 4 │ ╰────────────────────────────────┴────────────┴──────────────┴────────────────┴────────────────────────╯ Bucket Metrics: ╭──────────────────────────────────────┬───────────────┬───────────┬──────────────┬────────┬─────────╮ │ Bucket │ Current Count │ Overflows │ Instantiated │ Poured │ Expired │ ├──────────────────────────────────────┼───────────────┼───────────┼──────────────┼────────┼─────────┤ │ crowdsecurity/http-crawl-non_statics │ - │ - │ 2 │ 2 │ 2 │ │ crowdsecurity/http-probing │ - │ - │ 2 │ 2 │ 2 │ ╰──────────────────────────────────────┴───────────────┴───────────┴──────────────┴────────┴─────────╯ Parser Metrics: ╭────────────────────────────────┬──────┬────────┬──────────╮ │ Parsers │ Hits │ Parsed │ Unparsed │ ├────────────────────────────────┼──────┼────────┼──────────┤ │ child-crowdsecurity/http-logs │ 9 │ 6 │ 3 │ │ child-crowdsecurity/nginx-logs │ 3 │ 3 │ - │ │ crowdsecurity/dateparse-enrich │ 3 │ 3 │ - │ │ crowdsecurity/geoip-enrich │ 3 │ 3 │ - │ │ crowdsecurity/http-logs │ 3 │ 3 │ - │ │ crowdsecurity/nginx-logs │ 3 │ 3 │ - │ │ crowdsecurity/non-syslog │ 3 │ 3 │ - │ ╰────────────────────────────────┴──────┴────────┴──────────╯What am i doing wrong?
2023.06.04 09:57 theyusedthelamppost ELI5: Are GPS and/or longitude measurements accurate enough to describe property lots?
2023.06.04 07:14 DoctorQuinlan Web Page URL works on Desktop but NOT when publishing online and viewing...?
2023.06.03 19:29 PC_Trainman North American B-25 Mitchell
![]() | submitted by PC_Trainman to flightradar24 [link] [comments] |
2023.06.03 16:27 Jeezir Issues looping through [EXCEL] data range when blank rows/cells are introduced. [VISIO]
Sub VisioNetworkAutomation() Dim ws As Worksheet Dim visApp As Visio.Application Dim visDoc As Visio.Document Dim visPage As Visio.Page Dim visStencil As Visio.Document Dim visShape As Visio.Shape Dim visConnector As Visio.Shape Dim boundingBox As Object Dim numberOfPages As Long Dim i As Long Dim deviceCountColumn As Long Dim lastDeviceRow As Long Dim endCell As Range Set ws = ThisWorkbook.Worksheets("Network Architecture") ' Set your worksheet and the column number you want to check numberOfPages = ws.Range("B9") ' Determines number of pages entered by user ' Create a new Visio document Set visApp = New Visio.Application Set visDoc = visApp.Documents.Open("C:\_EAA Network Automation\EAA Network_Blank.vsdm") For i = 1 To numberOfPages ' Create Visio pages, then sets the name and background Set visPage = visDoc.Pages.Add visPage.Name = "Page-" & i visPage.BackPage = "Background-1" Next i Set visStencil = visApp.Documents.OpenEx("EAA.VSSX", visOpenDocked) ' Open the Basic Shapes stencil deviceCountColumn = 10 ' Column to check = J, Change this to the desired column number (1 for Column A, 2 for Column B, etc.) lastDeviceRow = ws.Cells(ws.Rows.Count, deviceCountColumn).End(xlUp).Row ' Find the last non-empty row in the column Set endCell = ws.Cells(lastDeviceRow, deviceCountColumn) ' Set end cell ranges Dim dataRange As Range Dim cell As Range Dim xCoord As Variant Dim yCoord As Variant Dim connectionTemplate Dim idMatch As Range Set dataRange = ws.Range(Range("J12"), Range(endCell.Address(0, 0))) 'Sets the range from J12 to last populated cell in J column ' Loop through the range and store the cell values in the array For Each cell In dataRange connectionTemplate = cell.Value ' Grabs the Connection Template of the current cell row xCoord = cell.Offset(0, 4).Value ' Grabs the x-coordinate of the current cell row yCoord = cell.Offset(0, 5).Value ' Grabs the y-coordinate of the current cell row If IsEmpty(cell) = False Then Set visShape = visDoc.Pages("Page-" & cell.Offset(0, 3).Value).Drop(visStencil.Masters(connectionTemplate), xCoord, yCoord) ' Drops current shape on current page visShape.Name = cell.Offset(0, -8).Value ' Write into Shapesheet data of shape visShape.Cells("Prop.Name.Value").FormulaU = Chr(34) & cell.Offset(0, -6) & Chr(34) 'Writes C4 to shapedata visShape.Cells("Prop.Model.Value").FormulaU = Chr(34) & cell.Offset(0, -5) & Chr(34) 'Writes D4 to shapedata visShape.Cells("Prop.IP.Value").FormulaU = Chr(34) & cell.Offset(0, -4) & Chr(34) 'Writes E4 to shapedata visShape.Cells("Prop.Subnet.Value").FormulaU = Chr(34) & cell.Offset(0, -3) & Chr(34) 'Writes F4 to shapedata visShape.Cells("Prop.Gateway.Value").FormulaU = Chr(34) & cell.Offset(0, -2) & Chr(34) 'Writes G4 to shapedata End If Next cell Set idRange = Range("L12:L51") For Each cell In idRange.SpecialCells(Type:=xlCellTypeConstants, Value:=xlNumbers) Set visConnector = visDoc.Pages("Page-" & cell.Offset(0, 1).Value).Drop(visApp.ConnectorToolDataObject, 0, 0) ' Connect the shapes (ID to Source) visConnector.Cells("BeginX").GlueTo visDoc.Pages("Page-" & cell.Offset(0, 4).Value).Shapes(cell.Offset(0, -10).Value).Cells("Connections.Left") visConnector.Cells("EndX").GlueTo visDoc.Pages("Page-" & cell.Offset(0, 1).Value).Shapes(cell.Value).Cells("Connections.Right") Next cell End SubThe piece in question is the last For loop which checks all populated cells in idRange (column L).
Set idRange = Range("L12:L51") For Each cell In idRange.SpecialCells(Type:=xlCellTypeConstants, Value:=xlNumbers) Set visConnector = visDoc.Pages("Page-" & cell.Offset(0, 1).Value).Drop(visApp.ConnectorToolDataObject, 0, 0) ' Connect the shapes (ID to Source) visConnector.Cells("BeginX").GlueTo visDoc.Pages("Page-" & cell.Offset(0, 4).Value).Shapes(cell.Offset(0, -10).Value).Cells("Connections.Left") visConnector.Cells("EndX").GlueTo visDoc.Pages("Page-" & cell.Offset(0, 1).Value).Shapes(cell.Value).Cells("Connections.Right") Next cellAgain, when there are no breaks in data from cell to cell, the code runs fine. As soon as I introduce a blank, it fails.
2023.06.03 12:57 SignificanceTop5132 Structural integrity of high rise buildings in NCR
![]() | submitted by SignificanceTop5132 to gurgaon [link] [comments] |
2023.06.03 12:42 SignificanceTop5132 Structural integrity of high rise buildings in NCR
submitted by SignificanceTop5132 to noida [link] [comments]
2023.06.03 12:37 ScholarNeonBot Structural integrity of high rise buildings in NCR
![]() | submitted by ScholarNeonBot to IndiaOpen [link] [comments] |
2023.06.03 08:01 RedditNoobie777 Auto run VBA every time data changes.
Private Sub Worksheet_Change(ByVal Target As Range) ' Disable events to prevent infinite loops Application.EnableEvents = False If Not Intersect(Target, Me.UsedRange) Is Nothing Then ' Your code here MsgBox "Data in the range has changed!" End If ' Re-enable events Application.EnableEvents = True End Sub
Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False 'Since 'Target' is already a range, you can use that directly to check if it's the range you're looking for. For example Dim myRange as Range Set myRange = Me.Range("A1:C20") If Not Intersect(myRange,Target) Is Nothing Then 'Put your code here End If 'If you want to specifically deal with changed values, you can also do it like this: Dim changedRange as Range Set changedRange = Intersect(myRange,Target) If not changedRange Is Nothing Then 'Now, changed Range is any changes that are in 'myRange' Dim changedCell as Range For Each changedCell in changedRange 'Do something with the cell. (Remember that if someone did a 'filldown' or pasted multiple values or something, 'Target' (the changed range) could include more than one cell, so it's always a good idea to check. Next changedCell End if Application.EnableEvents = True End Sub
Sub CopyFillColor() Dim ws1 As Worksheet, ws2 As Worksheet Dim table1 As Range, table2 As Range Dim cell As Range Dim searchValue As String ' Set the worksheet and table ranges Set ws1 = ThisWorkbook.Worksheets("Sheet1") ' Change "Sheet1" to the name of your worksheet Set ws2 = ThisWorkbook.Worksheets("Sheet2") ' Change "Sheet2" to the name of your worksheet Set table1 = ws1.Range("A1:F10") ' Change the range to your Table 1 range Set table2 = ws2.Range("A1:F10") ' Change the range to your Table 2 range ' Loop through each cell in Table 1 For Each cell In table1 searchValue = cell.Value ' Check if the cell value matches the specified text in Table 2 If WorksheetFunction.CountIf(table2, "*" & searchValue & "*") > 0 Then ' Find the matching cell in Table 2 Dim matchCell As Range Set matchCell = table2.Find(What:="*" & searchValue & "*") ' Copy the format from Table 2 to Table 1 matchCell.Copy cell.PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode = False End If Next cell End Sub
Private Sub Worksheet_Change(ByVal Target As Range) Dim rng As Range Set rng = Range("A1:A10") ' Change this to your desired range ' Disable events to prevent infinite loops Application.EnableEvents = False If Not Intersect(Target, rng) Is Nothing Then CopyFillColor ' Call the CopyFillColor subroutine MsgBox "Data in the range has changed!" End If ' Re-enable events Application.EnableEvents = True End Sub Sub CopyFillColor() Dim ws1 As Worksheet, ws2 As Worksheet Dim table1 As Range, table2 As Range Dim cell As Range Dim searchValue As String ' Set the worksheet and table ranges Set ws1 = ThisWorkbook.Worksheets("Sheet1") ' Change "Sheet1" to the name of your worksheet Set ws2 = ThisWorkbook.Worksheets("Sheet1") ' Change "Sheet2" to the name of your worksheet Set table1 = ws1.Range("A1:A10") ' Change the range to your Table 1 range Set table2 = ws2.Range("C1:C3") ' Change the range to your Table 2 range ' Loop through each cell in Table 1 For Each cell In table1 searchValue = cell.Value ' Check if the cell value matches the specified text in Table 2 If WorksheetFunction.CountIf(table2, "*" & searchValue & "*") > 0 Then ' Find the matching cell in Table 2 Dim matchCell As Range Set matchCell = table2.Find(What:="*" & searchValue & "*") ' Copy the format from Table 2 to Table 1 matchCell.Copy cell.PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode = False End If Next cell End Sub
2023.06.03 04:20 AutoModerator [Get] Austin Belcak – The Dream Job System Download
![]() | Download : https://imcourse.one/get-austin-belcak-the-dream-job-system-download submitted by AutoModerator to imcoursess [link] [comments] https://preview.redd.it/ip7rv87uok3b1.jpg?width=755&format=pjpg&auto=webp&s=dd1f8528fc87e47ceb494b51e9acca2298169cb6 The Dream Job System bring you quick, highly actionable strategies to help you land a job you love without “traditional” experience and without applying online. These modern job search tactics stem from Austin Belcak’s personal experience landing offers from Google, Microsoft, and Twitter as well as his experience helping thousands of job seekers get hired at the world’s best companies without applying online. What You Get Inside The Dream Job System:Module #1 – THE UNCONVENTIONAL JOB SEARCH BLUEPRINT
|
2023.06.02 23:20 code_hunter_cc ionic geolocation plugin error: "No provider for Geolocation"
2023.06.02 22:50 Ohblondie Calling all new homeschool parents..
2023.06.02 22:42 ragnaros_preachos HELP: Find the London Borough a specific location falls in given its Latitude and Longitude
2023.06.02 22:37 ragnaros_preachos HELP: Find the London Borough a specific location falls in given its Latitude and Longitude
2023.06.02 22:23 throwmybitchassaway Can anyone explain why I’ve been having such intense dreams these last few months? Is there something in my chart that might indicate that?
![]() | submitted by throwmybitchassaway to AskAstrologers [link] [comments] |
2023.06.02 19:23 -AerialAce- After escaping from the Wildebeest Society, Dick tries to find the Titans while dealing with a combative Pantha. [New Titans Vol 1 #76]
![]() | submitted by -AerialAce- to Nightwing [link] [comments] |
2023.06.02 18:06 penismusic12346 This R44 just deployed pink powder over pencoed for a gender reveal, couldnt get a picture sadly
![]() | submitted by penismusic12346 to flightradar24 [link] [comments] |
2023.06.02 17:00 horsecake22 Monthly /r/ULTexas Backpacking Pictures Post
2023.06.02 15:05 kaiserdx Doing ML works in AWS. Need help installing cartopy