.NET | Second Life Blog

Posts Tagged ‘.NET’

VB.NET: PHP Time() Equivalent

Tuesday, February 23rd, 2010

This piece of code will calculate seconds since the Unix Epoch (January 1 1978 00:00:00 GMT).

Private Function time() As Long
    Return time(DateTime.UtcNow)
End Function
 
Private Function time(ByVal time As DateTime) As Long
    Dim unixEpoch As New DateTime(1978, 1, 1, 0, 0, 0)
    Dim span As TimeSpan = time.Subtract(unixEpoch)
    
    Return CLng(span.TotalSeconds)
End Function
 
Private Function fromPHPTime(ByVal ticks As Long) As DateTime
    Dim unixEpoch As New DateTime(1970, 1, 1, 0, 0, 0)
    Return unixEpoch.Add(New TimeSpan(0, 0, CInt(ticks)))
End Function

Rating: 0.0/5 (0 votes cast)

Rating: 0 (from 0 votes)

Tags: .NET, Programming, VB.NET
Posted in Dot net | No Comments »

C#: Opens Office Documents in Web Browser Control

Monday, January 4th, 2010

This post is related to/same as a previous post VB: Opens Office Documents in Web Browser Control

Use the following steps to create a C# application that opens Office documents:

Start Visual Studio and create a new C# project. Form1 created by default.
From the Components toolbox, Add an instance of the WebBrowser control, CommonDialog control, and a CommandButton to Form1.
Next, add the following code into the Code window for Form1:

object oDocument;
 
private void button1_Click(object sender, EventArgs e)
 {
 string sFileName;
 openFileDialog1.FileName = "";
 openFileDialog1.ShowDialog();
 sFileName = openFileDialog1.FileName;
 
 if (sFileName.Length!=0)
 {
 oDocument = null;
 webBrowser1.Navigate(sFileName);
 }
 }
 
 private void Form1_Load(object sender, EventArgs e)
 {
 openFileDialog1.Filter = "Office Documents " + " " + "(*.doc, *.xls, *.ppt)|*.doc;*.xls;*.ppt";
 openFileDialog1.FilterIndex = 1;
 
 }
 
 private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
 {
 oDocument = webBrowser1.Document;
 
 }

Press F5 to run the project. When you select the Browse button, the Open dialog box appears allowing you to navigate to a Word, Excel or PowerPoint file.
Choose Open and the document should open inside the WebBrowser control.

Rating: 0.0/5 (0 votes cast)

Rating: +1 (from 1 vote)

Tags: .NET, C#, Software, Windows
Posted in Dot net | 2 Comments »

Arabization Controls for Windows CE

Monday, October 20th, 2008

http://www.codeproject.com/KB/mobile/ArabizationControls.aspx

Rating: 0.0/5 (0 votes cast)

Rating: 0 (from 0 votes)

Tags: .NET, C#, Java, Mobility, Programming, Smart Devices, VB
Posted in Dot net | 3 Comments »

To be able to reset a PocketPC/WindowsCE programmatically from within a managed application, it is necessary to send a IOCTL to the device using KernelIoControl. This API is not available directly in managed code, so we need to P/Invoke KernelIoControl, providing it with the correct IOCTL (IOCTL_HAL_REBOOT). To assure that IOCTL’s are unique, they can be created in native code using the CTL_CODE macro. To be able to create the same IOCTL from managed code, we make sure to define the IOCTL in a similar way as CTL_CODE does. Note that running the sample code from inside any Visual Studio 2003 or up resets the device, resulting in a lost connection to the device.

Code:

Complete C# sample. A Windows Form PocketPC application containing a button to reset the device:

namespace ResetDevice
{
using System;
using System.Drawing;
using System.Collections;
using System.Windows.Forms;
using System.Data;
using System.Runtime.InteropServices;
 
public class Form1 : System.Windows.Forms.Form
{
private System.Windows.Forms.Button button1;
private System.Windows.Forms.MainMenu mainMenu1;
internal static Int32 METHOD_BUFFERED = 0;
internal static Int32 FILE_ANY_ACCESS = 0;
internal static Int32 FILE_DEVICE_HAL = 0x00000101;
internal static Int32 IOCTL_HAL_REBOOT =
((FILE_DEVICE_HAL) &lt; &lt; 16)
((FILE_ANY_ACCESS) &lt; &lt; 14)
((15) &lt; &lt; 2)  (METHOD_BUFFERED);
 
[DllImport("coredll.dll", SetLastError=true)]
private static extern bool KernelIoControl(Int32 dwIoControlCode,
IntPtr lpInBuf,
Int32 nInBufSize,
byte[] lpOutBuf,
Int32 nOutBufSize,
ref Int32 lpBytesReturned);
public static void ResetDevice()
{
int cb = 0;
byte[] buffer = new byte[1];
KernelIoControl(IOCTL_HAL_REBOOT,
IntPtr.Zero,
0,
buffer,
0,
ref cb);
}
 
public Form1()
{
InitializeComponent();
}
 
protected override void Dispose( bool disposing )
{
base.Dispose( disposing );
}
 
private void InitializeComponent()
{
this.mainMenu1 = new System.Windows.Forms.MainMenu();
this.button1 = new System.Windows.Forms.Button();
this.button1.Location = new System.Drawing.Point(64, 144);
this.button1.Size = new System.Drawing.Size(112, 48);
this.button1.Text = "Reset Device";
this.button1.Click += new System.EventHandler(this.button1_Click);
this.Controls.Add(this.button1);
this.Menu = this.mainMenu1; this.Text = "Form1";
}
 
static void Main()
{
Application.Run(new Form1());
}
 
private void button1_Click(object sender, System.EventArgs e)
{
ResetDevice();
}
}
}
 
Definition of the IOCTL, P/Invoke declaration to KernelIoControl and invocation of the IOCTL in VB.NET:
 
Imports System.Runtime.InteropServices
 
Public Class Form1 Inherits System.Windows.Forms.Form
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
 
Private Shared METHOD_BUFFERED As Int32 = 0
Private Shared FILE_ANY_ACCESS As Int32 = 0
Private Shared FILE_DEVICE_HAL As Int32 = &amp;H101
Private Shared IOCTL_HAL_REBOOT As Int32 = (&amp;H10000 * FILE_DEVICE_HAL) Or _
(&amp;H4000 * FILE_ANY_ACCESS) Or _
(&amp;H4 * 15) Or METHOD_BUFFERED
Declare Function KernelIoControl _
Lib "CoreDll.dll" (ByVal dwIoControlCode As Int32, _
ByVal lpInBuf As IntPtr, _
ByVal nInBufSize As Int32, _
ByVal lpOutBuf() As Byte, _
ByVal nOutBufSize As Int32, _
ByRef lpBytesReturned As Int32) As Boolean
 
' Generated code, omitted in this example
 
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Dim outbuff(1) As Byte Dim dwOutBytes As Int32 = 0
If Not KernelIoControl(IOCTL_HAL_REBOOT, _
IntPtr.Zero, _
0, outbuff, 0, dwOutBytes) Then
MessageBox.Show("KernelIoControl failed")
End If
End Sub
End Class

Rating: 0.0/5 (0 votes cast)

Rating: 0 (from 0 votes)

Tags: .NET, C#, CE, OS, Programming
Posted in Dot net, OS | No Comments »

VB.NET Soft reset function for smart devices

Sunday, May 14th, 2006

Public Function SoftReset() As Integer
Dim bytesReturned As Integer = 0
Dim r As System.Windows.Forms.DialogResult
‘ Show the user a dialog first, giving them the option to cancel
r = System.Windows.Forms.MessageBox.Show( _
“Running this test will soft reset the device and cancel subsequent tests. Do you wish to continue?”, _
“ResetDevice Test”, _
System.Windows.Forms.MessageBoxButtons.YesNo, _
System.Windows.Forms.MessageBoxIcon.Question, _
System.Windows.Forms.MessageBoxDefaultButton.Button2 _
)
‘ If the user said “yes, soft reset”, then…
If r = System.Windows.Forms.DialogResult.Yes Then
Dim IOCTL_HAL_REBOOT As Integer = CTL_CODE(FILE_DEVICE_HAL, _
15, METHOD_BUFFERED, FILE_ANY_ACCESS)
‘ Run the function from coredll.dll
Return KernelIoControl(IOCTL_HAL_REBOOT, IntPtr.Zero, 0, _
IntPtr.Zero, 0, bytesReturned)
Else
‘ If the user said “no, don’t soft reset”, then show a message
‘ box
System.Windows.Forms.MessageBox.Show(“Soft Reset aborted by user”)
Return bytesReturned
End If
End Function