Posts
 
Reputation
Joined
Last Seen
0 Reputation Points
Unknown Quality Score

No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.

0 Endorsements
Ranked #31.8K
Ranked #3K
~912 People Reached
Favorite Tags

5 Posted Topics

Member Avatar for Tamir09

This code should do it: [code=VB] Imports System Imports System.Collections.Generic Imports System.ComponentModel Imports System.Data Imports System.Drawing Imports System.Text Imports System.Windows.Forms Imports System.Runtime.InteropServices Namespace ExtractIcon Partial Public Class Form1 Inherits Form ' Constants that we need in the function call Private Const SHGFI_ICON As Integer = &H100 Private Const SHGFI_SMALLICON As …

Member Avatar for Teme64
0
308
Member Avatar for Tank50

It looks like you start using the reader without reading some data first. [code=c#] void ReadData(SqlConnection conn, string sql) SqlDataReader datareader; SqlCommand cmd = new SqlCommand(); cmd.Connection = conn; cmd.CommandText = sql; datareader = cmd.ExecuteReader(); while (datareader.Read()) { // perform your code here } } [/code] Cheers, Dennis

Member Avatar for Tank50
0
172
Member Avatar for laghaterohan

The contents of the zipfile is placed in the targetfolder. You can use DirectoryInfo.GetFiles() to process each file in the targetdir and extract them afterwards if you want. Another option would be to use the FastZip(FastZipEvents) to create the new instance so you get notified of each individual file that …

Member Avatar for laghaterohan
0
184
Member Avatar for ch_nilanjan

Something like this? [CODE=c#] private void SetLogo(string logoPath) { try { pctLogo.Image = System.Drawing.Bitmap.FromFile(logoPath); } catch { } }[/CODE]

Member Avatar for ch_nilanjan
0
106
Member Avatar for MagicBytes

The VB shell-command returns an ID that you can use to activate the specified application. [code] Dim MyAppID as Long Sub StartApplication() MyAppID = Shell("C:\Notepad.exe", 1) End Sub Sub MySendkeys(String Keystring, Optional Boolean Wait=False) If (MyAppID <> 0) Then Call AppActivate(MyAppID) Call SendKeys(Keystring, Wait) End If End Sub [/code] This …

Member Avatar for djjaries
0
142

The End.