Skip to content

Instantly share code, notes, and snippets.

View orellabac's full-sized avatar

Orellabac orellabac

View GitHub Profile
function arrange(windows)
{
var i = 0;
var maxHeight = 0;
var currentX = 0;
var currentY = 0;
var maxWidth = window.innerWidth;
var padding = 10;
var paddingY = 30;
for (i=0;i<windows.length;i++)
function cascadeArrange(windows)
{
var i = 0;
var maxHeight = 0;
var currentX = 50;
var currentY = 50;
var maxWidth = window.innerWidth;
var padding = 50;
var paddingY = 30;
for (i=0;i<windows.length;i++)
@orellabac
orellabac / ProxyController.cs
Last active September 9, 2019 00:54
ProxyController
using HtmlAgilityPack;
using System.Collections.Specialized;
using System.IO;
using System.Net;
using System.Web.Mvc;
namespace WebApplication9.Controllers
{
public class ProxyController : Controller
{
public class Class1 {}
using System;
using System.Collections.Generic;
using System.Web;
using System.Web.SessionState;
namespace UpgradeHelpers.WebMap.Server
{
public class OnlineUsersModule : IHttpModule
{
private static Int32 _sessionTimeOut = 20; // Set Default to 20 Minutes
VERSION 5.00
Begin VB.Form Form1
Caption = "Drag and Drop"
ClientHeight = 3195
ClientLeft = 6180
ClientTop = 5730
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3195
ScaleWidth = 4680
using System;
using System.Windows.Forms;
namespace WindowsFormsApplication8
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
using System.Collections.Generic;
namespace System.Windows.Forms
{
public static class DragAndDropExtensions
{
static HashSet<Type> draggedTypes = new HashSet<Type>();
public static void BeginDrag(this Control c)
{
draggedTypes.Add(c.GetType());
@orellabac
orellabac / openWindows.js
Last active August 19, 2016 22:36
Get List of currently opened Kendo Windows
function getOpenKendoWindows() {
return $(".k-window-content").map(
function(idx){
var kwin = $(this).data("kendoWindow");
return kwin; })
}
Option Compare Database
Sub AllForms()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
' Search for open AccessObject objects in AllForms collection.
For Each obj In dbs.AllForms
If obj.IsLoaded = True Then
' Print name of obj.