|
ThanK U!!!!! now i c the problem clearly. it's because VB is a high level language so it cant achieve so high speed, rite?
so to achieve the 400khz what i hv to do is use C's in line assemble language?
or can i read the CPU information from the BIOS everytime, so i can directly use the system clock to generate such pulse? Can i do this in VB or C or other high level language?
Thank U again, Sir!!! u really help me a lot
|
|
|
|
|
Well, when VB is executed, one statement in VB can equate to several statements in C. The problem your going to run into is that the time you require between pulses, MAY not be enough to execute the required statements to generate the pulses and track the time between them. You can use the program in my previous post to find out how long it takes your machine to execute just a simple assignment and a call to QueryPerformanceCounter.
Remember, you only have 0.0000025 seconds between pulses! Your going to need a bunch more statements to track the time between pulses with near continuous calls to QueryPerformanceCounter, fire an Out statement or some other event on Time (or really close to it!), AND let the system do other housekeeping work while you literally HOG the CPU generating this clock pulse so fast!
This is the ONLY high resolution timer that has (1) sub 1 millisecond resolution and (2) has an API call to it. Oh! and not all systems support this timer! Also, you can forget about capturing the CPU clock, it's WAY to fast and there is no way grab it.
A better test to see how fast your system will execute statements:
#include <windows.h>
#include <stdio.h>
#include <conio.h>
int main()
{
BOOL rc;
int iReturn;
LARGE_INTEGER liCountPerSecond, liStartTime, liEndTime, liCounts;
double dSeconds;
rc = QueryPerformanceFrequency( &liCountPerSecond );
printf( "Counts per second: %I64i\n", liCountPerSecond );
rc = QueryPerformanceCounter( &liStartTime );
iReturn = 0;
iReturn = 1;
iReturn = 2;
iReturn = 3;
iReturn = 4;
rc = QueryPerformanceCounter( &liEndTime );
iReturn = 5;
iReturn = 6;
iReturn = 7;
iReturn = 8;
iReturn = 9;
rc = QueryPerformanceCounter( &liEndTime );
printf( "Start Time: %I64i\n", liStartTime );
printf( "End Time : %I64i\n", liEndTime );
liCounts.QuadPart = liEndTime.QuadPart - liStartTime.QuadPart;
printf( "Counts : %I64i\n", liCounts );
dSeconds = (double)liCounts.QuadPart / (double)liCountPerSecond.QuadPart;
printf( "Time in Seconds : %15.10f seconds\n", dSeconds );
getch();
}
RageInTheMachine9532
|
|
|
|
|
So what i hv to do is use C or C++, rite? but using C is too troublesome. Can i use a DLL which contain the assemble one, then i call it from VB?
I hv read some articles abt MASM. it says that the MASM support a mixed programming language. it means MASM can also be used for Basic or VB?
Thank U very much!!! =)
|
|
|
|
|
Hi All,
I am having a very disturbing issue with my program Project1.vbp calling a security project Security_DLL.vbp that calls Cryptography API.
Basically I have a clsSecurity class in Security_DLL.vbp to encrypt password for my connection string to the SQL Server.
When I full compile my program, evertyhing works well and no error or whatsoever. But when I make my Security_DLL.vbp and make my Project1.vbp into an EXE file (no problem), it's when I run the program from the .EXE, the program shuts down with the error below in a file.
I suspect this has something to memory problem. I believe I have destroy the hash and the key as well as release the context but somehow the problem still exist.
Will greatly appreciate if anyone can help out here.
<database>
<exe name="vb6.exe" filter="GRABMI_FILTER_PRIVACY">
<matching_file name="CVPACK.EXE" size="81979" checksum="0xEE37E593" bin_file_version="6.0.8168.0" bin_product_version="6.0.8168.0" product_version="6.00.8168.0" file_description="Microsoft (R) Debugging Information Compactor" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8168.0" original_filename="CVPACK.EXE" internal_name="CVPACK.EXE" legal_copyright="Copyright (C) Microsoft Corp. 1992-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.8168.0" upto_bin_product_version="6.0.8168.0" link_date="06/18/1998 01:27:39" upto_link_date="06/18/1998 01:27:39" ver_language="English (United States) [0x409]">
<matching_file name="LINK.EXE" size="462901" checksum="0x3D470D68" bin_file_version="6.0.8168.0" bin_product_version="6.0.8168.0" product_version="6.00.8168.0" file_description="Microsoft (R) Incremental Linker" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8168.0" original_filename="LINK.EXE" internal_name="LINK.EXE" legal_copyright="Copyright (C) Microsoft Corp. 1992-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.8168.0" upto_bin_product_version="6.0.8168.0" link_date="06/26/1998 05:57:41" upto_link_date="06/26/1998 05:57:41" ver_language="English (United States) [0x409]">
<matching_file name="MSPDB60.DLL" size="180276" checksum="0x5B960A8E" bin_file_version="6.0.8168.0" bin_product_version="6.0.8168.0" product_version="6.00.8168.0" file_description="Microsoft (R) Program Database" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8168.0" original_filename="MSPDB60.DLL" internal_name="MSPDB60.DLL" legal_copyright="Copyright (C) Microsoft Corp. 1992-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.8168.0" upto_bin_product_version="6.0.8168.0" link_date="06/17/1998 17:14:39" upto_link_date="06/17/1998 17:14:39" ver_language="English (United States) [0x409]">
<matching_file name="MSDIS110.DLL" size="159798" checksum="0x20E80FFC" bin_file_version="1.10.8126.0" bin_product_version="1.10.8126.0" product_version="1.10.8126" file_description="Microsoft (R) Disassembler" company_name="Microsoft Corporation" product_name="Microsoft (R) Disassembler" file_version="1.10.8126" original_filename="MSDIS110.DLL" internal_name="MSDIS110.DLL" legal_copyright="Copyright (C) Microsoft Corp. 1994-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x28F2A" linker_version="0x0" upto_bin_file_version="1.10.8126.0" upto_bin_product_version="1.10.8126.0" link_date="05/06/1998 17:52:27" upto_link_date="05/06/1998 17:52:27" ver_language="English (United States) [0x409]">
<matching_file name="C2.EXE" size="667648" checksum="0xB125EA06" bin_file_version="12.0.8041.0" bin_product_version="6.0.8041.0" product_version="6.00.8041.0" file_description="Microsoft (R) 32-Bit 80x86 Compiler Back End" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="12.00.8041.0" original_filename="C2.EXE" internal_name="C2.EXE" legal_copyright="Copyright (C) Microsoft Corp. 1992-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="12.0.8041.0" upto_bin_product_version="6.0.8041.0" link_date="02/10/1998 20:32:31" upto_link_date="02/10/1998 20:32:31" ver_language="English (United States) [0x409]">
<matching_file name="VB6.EXE" size="1880064" checksum="0x9FA47BB4" bin_file_version="6.0.81.76" bin_product_version="6.0.81.76" product_version="6.00.8176" file_description="Visual Basic" company_name="Microsoft Corporation" product_name="Visual Basic" file_version="6.00.8176" internal_name="VB6.EXE" legal_copyright="Copyright © 1987-1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x1D5345" linker_version="0x0" upto_bin_file_version="6.0.81.76" upto_bin_product_version="6.0.81.76" link_date="06/25/1998 07:49:51" upto_link_date="06/25/1998 07:49:51" ver_language="English (United States) [0x409]">
<matching_file name="VB6DEBUG.DLL" size="31504" checksum="0xC767901C" bin_file_version="6.0.81.69" bin_product_version="6.0.81.69" product_version="6.00.8169" file_description="Visual Basic 6.0 Debugging Support" company_name="Microsoft Corporation" product_name="Visual Basic 6.0" file_version="6.00.8169" internal_name="VBDEBUG.DLL"" legal_copyright="Copyright © 1987-1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x1123A" linker_version="0x0" upto_bin_file_version="6.0.81.69" upto_bin_product_version="6.0.81.69" link_date="06/18/1998 11:06:46" upto_link_date="06/18/1998 11:06:46" ver_language="English (United States) [0x409]">
<matching_file name="VBA6.DLL" size="1701648" checksum="0xAF94B03F" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.0" file_description="Visual Basic for Applications Development Environment" company_name="Microsoft Corporation" product_name="Microsoft Visual Basic for Applications" file_version="6.0.8169" original_filename="VBA6.DLL" internal_name="VBA6.DLL" legal_copyright="Copyright © Microsoft Corp. 1993-1998" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x1A081E" linker_version="0x0" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/20/1998 01:12:20" upto_link_date="06/20/1998 01:12:20" ver_language="Language Neutral [0x0]">
<matching_file name="VB6IDE.DLL" size="1074448" checksum="0x71E1A442" bin_file_version="5.0.81.69" bin_product_version="5.0.81.69" product_version="6.00.8169" file_description="Visual Basic Environment International Resources" company_name="Microsoft Corporation" product_name="Visual Basic Environment" file_version="6.00.8169" internal_name="vb6ide.dll" legal_copyright="Copyright © 1987-1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x10F112" linker_version="0x0" upto_bin_file_version="5.0.81.69" upto_bin_product_version="5.0.81.69" link_date="06/18/1998 11:32:52" upto_link_date="06/18/1998 11:32:52" ver_language="English (United States) [0x409]">
<matching_file name="VISDATA.EXE" size="790528" checksum="0xB3105580" bin_file_version="6.0.0.8168" bin_product_version="6.0.0.8168" product_version="6.00.8168" company_name="Microsoft Corp." product_name="VisData" file_version="6.00.8168" original_filename="VISDATA.exe" internal_name="VISDATA" legal_copyright="Copyright 1996-97 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0xCC810" linker_version="0x60000" upto_bin_file_version="6.0.0.8168" upto_bin_product_version="6.0.0.8168" link_date="06/18/1998 18:21:51" upto_link_date="06/18/1998 18:21:51" ver_language="English (United States) [0x409]">
<matching_file name="VBSCC.DLL" size="277504" checksum="0x8E9E94C3" bin_file_version="6.0.81.42" bin_product_version="6.0.0.0" product_version="06.00.0000" file_description="Microsoft SourceSafe VB5 Add-In" product_name="Microsoft SourceSafe" file_version="06.00.8142" original_filename="VBSCC.DLL" internal_name="VBSCC" legal_copyright="© 1994-1998 Microsoft ® Corporation. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10001" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.81.42" upto_bin_product_version="6.0.0.0" link_date="05/22/1998 20:22:32" upto_link_date="05/22/1998 20:22:32" ver_language="English (United States) [0x409]">
<matching_file name="ADDSCCUS.DLL" size="77312" checksum="0xE19A217F" bin_file_version="6.0.81.42" bin_product_version="6.0.0.0" product_version="06.00.0000" file_description="Microsoft SourceSafe Add-In Resource DLL" product_name="Microsoft SourceSafe" file_version="06.00.8142" original_filename="ADDSCCUS.DLL" internal_name="ADDSCCUS" legal_copyright="© 1994-1998 Microsoft ® Corporation. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.81.42" upto_bin_product_version="6.0.0.0" link_date="05/22/1998 19:38:59" upto_link_date="05/22/1998 19:38:59" ver_language="English (United States) [0x409]">
<matching_file name="DATAVIEW.DLL" size="540672" checksum="0x7413E29F" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" file_description="Visual Basic DataView Window" company_name="Microsoft Corp." product_name="Visual Basic DataView" file_version="6.00.8169" original_filename="dataview.dll" internal_name="dataview" legal_copyright="Copyright 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x8BD64" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:07:28" upto_link_date="06/18/1998 18:07:28" ver_language="English (United States) [0x409]">
<matching_file name="REPVB.DLL" size="286480" checksum="0x8FF829A" bin_file_version="6.0.8163.0" bin_product_version="6.0.8163.0" product_version="6.0.8163.0" file_description="Microsoft Repository AddIn for Visual Basic" product_name="Repository Browser" file_version="6.0.8163.0" original_filename="REPVB.DLL" internal_name="REPVB" legal_copyright="© 1995-1998 Microsoft ® Corporation. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10001" verfiletype="0x1" module_type="WIN32" pe_checksum="0x4AA5C" linker_version="0x0" upto_bin_file_version="6.0.8163.0" upto_bin_product_version="6.0.8163.0" link_date="06/12/1998 19:30:15" upto_link_date="06/12/1998 19:30:15" ver_language="English (United States) [0x409]">
<matching_file name="REPVBRC.DLL" size="30992" checksum="0xF9155C1" bin_file_version="6.0.8161.0" bin_product_version="6.0.8161.0" product_version="6.0.8161.0" file_description="Microsoft Repository AddIn for Visual Basic Resources" product_name="Repository SDK" file_version="6.0.8161.0" original_filename="REPVBRC.DLL" internal_name="REPVBRC" legal_copyright="© 1995-1998 Microsoft ® Corporation. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10001" verfiletype="0x1" module_type="WIN32" pe_checksum="0xE538" linker_version="0x0" upto_bin_file_version="6.0.8161.0" upto_bin_product_version="6.0.8161.0" link_date="06/10/1998 22:33:53" upto_link_date="06/10/1998 22:33:53" ver_language="English (United States) [0x409]">
<matching_file name="REPVBTIM.DLL" size="22800" checksum="0xDF832F24" bin_file_version="6.0.8161.0" bin_product_version="6.0.8161.0" product_version="6.0.8161.0" file_description="Microsoft Repository AddIn for Visual Basic" product_name="Repository Browser" file_version="6.0.8161.0" original_filename="REPVB.DLL" internal_name="REPVB" legal_copyright="© 1995-1998 Microsoft ® Corporation. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10001" verfiletype="0x1" module_type="WIN32" pe_checksum="0x139F2" linker_version="0x0" upto_bin_file_version="6.0.8161.0" upto_bin_product_version="6.0.8161.0" link_date="06/10/1998 22:34:09" upto_link_date="06/10/1998 22:34:09" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\SETUP.EXE" size="371200" checksum="0x8982F761" bin_file_version="3.1.0.8043" bin_product_version="3.1.0.8043" product_version="3.01.0.8043" file_description="Microsoft Setup Tool" company_name="Microsoft Corporation" product_name="Microsoft App-wide Setup for Windows" file_version="3.01.0.8043" original_filename="ACMSETUP.EXE" internal_name="ACMSETUP" legal_copyright="Copyright © Microsoft Corp. 1991-1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x10001" verfiletype="0x1" module_type="WIN32" pe_checksum="0x60D75" linker_version="0x0" upto_bin_file_version="3.1.0.8043" upto_bin_product_version="3.1.0.8043" link_date="02/12/1998 23:34:08" upto_link_date="02/12/1998 23:34:08" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\MSSETUP.DLL" size="283136" checksum="0xCAF15A22" bin_file_version="3.1.0.1918" bin_product_version="3.1.0.1918" product_version="3.01.0.8043" file_description="Setup DLL" company_name="Microsoft Corporation" product_name="Microsoft Setup for Windows" file_version="3.01.0.8043" original_filename="MSSETUP.DLL" internal_name="MSSETUP" legal_copyright="Copyright © Microsoft Corp. 1991-1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="3.1.0.1918" upto_bin_product_version="3.1.0.1918" link_date="02/12/1998 23:32:53" upto_link_date="02/12/1998 23:32:53" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\COMMON98.DLL" size="184320" checksum="0x2FA1D9A8" bin_file_version="6.0.0.8168" bin_product_version="6.0.0.8168" product_version="6.00.8168" file_description="setup" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8168" original_filename="setup.exe" internal_name="setup" legal_copyright="Copyright © 1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.0.8168" upto_bin_product_version="6.0.0.8168" link_date="06/17/1998 15:21:46" upto_link_date="06/17/1998 15:21:46" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\PHOLDER.DLL" size="29696" checksum="0x2F1EB288" bin_file_version="6.0.0.8146" bin_product_version="6.0.0.8146" product_version="6.00.8146" file_description="setup" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8146" original_filename="setup.exe" internal_name="setup" legal_copyright="Copyright © 1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.0.8146" upto_bin_product_version="6.0.0.8146" link_date="05/26/1998 01:13:56" upto_link_date="05/26/1998 01:13:56" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\VB98ENT.DLL" size="65024" checksum="0xF8E5DC9F" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" file_description="setup" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual Studio" file_version="6.00.8169" original_filename="setup.exe" internal_name="setup" legal_copyright="Copyright © 1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 15:49:41" upto_link_date="06/18/1998 15:49:41" ver_language="English (United States) [0x409]">
<matching_file name="Setup\1033\VSSCANTL.DLL" size="229376" checksum="0xBC94A1A1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" link_date="04/23/1998 03:09:20" upto_link_date="04/23/1998 03:09:20">
<matching_file name="Setup\1033\ODBCSTF.DLL" size="28672" checksum="0xB932697F" bin_file_version="3.510.3002.13" bin_product_version="3.510.3002.13" product_version="3.510.3002.13" file_description="ODBC Version 3.0 Custom Action Setup DLL" company_name="Microsoft Corporation" product_name="ODBCSTF" file_version="3.510.3002.13" internal_name="ODBCSTF" legal_copyright="Copyright © Microsoft Corporation 1995-1996" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x16CD0" linker_version="0x0" upto_bin_file_version="3.510.3002.13" upto_bin_product_version="3.510.3002.13" link_date="06/20/1998 23:48:26" upto_link_date="06/20/1998 23:48:26">
<matching_file name="Wizards\RC.EXE" size="7440" checksum="0x43CC4DF7" bin_file_version="5.0.1641.1" bin_product_version="5.0.1641.1" product_version="5.00.1641.1" file_description="Microsoft Resource Compiler" company_name="Microsoft Corporation" product_name="Microsoft(R) Windows NT(R) Operating System" file_version="5.00.1641.1" original_filename="rc.exe" internal_name="rc.exe" legal_copyright="Copyright (C) Microsoft Corp. 1981-1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x1" module_type="WIN32" pe_checksum="0xAE33" linker_version="0x50000" upto_bin_file_version="5.0.1641.1" upto_bin_product_version="5.0.1641.1" link_date="08/24/1997 15:11:32" upto_link_date="08/24/1997 15:11:32" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\RCDLL.DLL" size="107792" checksum="0xFB77211D" bin_file_version="5.0.1641.1" bin_product_version="5.0.1641.1" product_version="5.00.1641.1" file_description="Microsoft Resource Compiler DLL" company_name="Microsoft Corporation" product_name="Microsoft(R) Windows NT(R) Operating System" file_version="5.00.1641.1" original_filename="rcdll.dll" internal_name="rcdll.dll" legal_copyright="Copyright (C) Microsoft Corp. 1981-1997" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x25232" linker_version="0x50000" upto_bin_file_version="5.0.1641.1" upto_bin_product_version="5.0.1641.1" link_date="08/24/1997 15:11:35" upto_link_date="08/24/1997 15:11:35" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\RESEDIT.DLL" size="368640" checksum="0xE3E6C236" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" file_description="Visual Basic 6 Resource Editor" company_name="Microsoft Corporation" product_name="Visual Basic 6 Resource Editor" file_version="6.00.8169" original_filename="ResEdit.dll" internal_name="ResEdit" legal_copyright="Copyright © 1997 Microsoft Corp" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x63293" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:02:36" upto_link_date="06/18/1998 18:02:36" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\TEMPMGR.DLL" size="94208" checksum="0xF2899B41" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" file_description="Visual Basic 6.0 Template Manager Add-In." company_name="Microsoft Corp." product_name="VB 6 Template Manager" file_version="6.00.8169" original_filename="tempmgr.dll" internal_name="tempmgr" legal_copyright="Copyright 1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x253A3" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:06:55" upto_link_date="06/18/1998 18:06:55" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\AXDOCWIZ.DLL" size="176128" checksum="0x97FC7C6E" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft Corp." product_name="VB 6 ActiveX Document Migration Wizard" file_version="6.00.8169" original_filename="axdocwiz.dll" internal_name="axdocwiz" legal_copyright="Copyright 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x33204" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:06:13" upto_link_date="06/18/1998 18:06:13" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\CLSSBLD.DLL" size="622592" checksum="0x7AFF287D" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft Corp." product_name="VB 6 Class Builder Utility" file_version="6.00.8169" original_filename="ClssBld.dll" internal_name="ClssBld" legal_copyright="Copyright 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x9EB08" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:04:15" upto_link_date="06/18/1998 18:04:15" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\CTRLWIZ.DLL" size="393216" checksum="0x4063989F" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft" product_name="VB 6 ActiveX Control Interface Wizard" file_version="6.00.8169" original_filename="ctrlwiz.dll" internal_name="ctrlwiz" legal_copyright="Copyright © 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x62F36" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:04:38" upto_link_date="06/18/1998 18:04:38" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PROPPGWZ.DLL" size="262144" checksum="0x20303D2" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft Corp." product_name="VB 6 Property Page Wizard" file_version="6.00.8169" original_filename="proppgwz.dll" internal_name="proppgwz" legal_copyright="Copyright Microsoft Corp. 1996-98" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x4D1E1" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:08:15" upto_link_date="06/18/1998 18:08:15" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\MSDATOBJ.DLL" size="688128" checksum="0x9B8AD39A" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft" product_name="Data Object Wizard" file_version="6.00.8169" original_filename="MSDatObj.dll" internal_name="MSDatObj" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0xAC31F" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:07:40" upto_link_date="06/18/1998 18:07:40" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\WIZMAN.DLL" size="118784" checksum="0x9953EB17" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft Corp." product_name="VB6WizardMgr" file_version="6.00.8169" original_filename="wizman.dll" internal_name="wizman" legal_copyright="Copyright 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x226EF" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:05:59" upto_link_date="06/18/1998 18:05:59" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\AITOOL.DLL" size="114688" checksum="0x1E4EF1E5" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft Corp." product_name="VBAddInToolbar6" file_version="6.00.8169" original_filename="aitool.dll" internal_name="aitool" legal_copyright="Copyright 1996-98 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x2605F" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:06:45" upto_link_date="06/18/1998 18:06:45" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\MAKECAB.EXE" size="136192" checksum="0x433AC93D" module_type="WIN32" pe_checksum="0x24EA4" linker_version="0x0" link_date="11/26/1996 06:21:47" upto_link_date="11/26/1996 06:21:47">
<matching_file name="Wizards\PDWizard\PDADDIN.DLL" size="57344" checksum="0xA4E2C700" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" product_name="Package and Deployment Add-In" file_version="6.00.8169" original_filename="pdaddin.dll" internal_name="pdaddin" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0x1981D" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:26:19" upto_link_date="06/18/1998 18:26:19" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\PDCMDLN.EXE" size="57344" checksum="0xA2DD05" bin_file_version="6.0.0.8169" bin_product_version="6.0.0.8169" product_version="6.00.8169" company_name="Microsoft" product_name="PDMan98" file_version="6.00.8169" original_filename="pdcmdLn.exe" internal_name="pdcmdLn" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x1A88F" linker_version="0x60000" upto_bin_file_version="6.0.0.8169" upto_bin_product_version="6.0.0.8169" link_date="06/18/1998 18:26:10" upto_link_date="06/18/1998 18:26:10" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\SETUP.EXE" size="140800" checksum="0x3ACF088B" bin_file_version="6.0.81.69" bin_product_version="6.0.81.69" product_version="6.00.8169" file_description="Setup Bootstrap for Visual Basic Setup Toolkit" company_name="Microsoft Corporation" product_name="Microsoft® Visual Basic for Windows" file_version="6.00.8169" original_filename="SETUP.EXE" internal_name="SETUP.EXE" legal_copyright="Copyright © 1987-1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.81.69" upto_bin_product_version="6.0.81.69" link_date="06/18/1998 18:36:02" upto_link_date="06/18/1998 18:36:02" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\SETUP1.EXE" size="286720" checksum="0xB86E004A" bin_file_version="6.0.0.8171" bin_product_version="6.0.0.8171" product_version="6.00.8171" file_description="Visual Basic 6.0 Setup Toolkit" company_name="Microsoft Corporation" product_name="Microsoft Visual Basic for Windows" file_version="6.00.8171" original_filename="setup1.exe" internal_name="setup1" legal_copyright="Copyright (c) 1987-1998 Microsoft Corporation" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x4BCB3" linker_version="0x60000" upto_bin_file_version="6.0.0.8171" upto_bin_product_version="6.0.0.8171" link_date="06/21/1998 00:33:43" upto_link_date="06/21/1998 00:33:43" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\ST6UNST.EXE" size="73216" checksum="0xFDF56B6C" bin_file_version="6.0.81.69" bin_product_version="6.0.81.69" product_version="6.00.8169" file_description="Visual Basic Setup Toolkit Uninstaller" company_name="Microsoft Corporation" product_name="Microsoft® Visual Basic for Windows" file_version="6.00.8169" original_filename="ST6UNST.DLL" internal_name="ST6UNST.EXE" legal_copyright="Copyright © 1987-1998 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x1" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="6.0.81.69" upto_bin_product_version="6.0.81.69" link_date="06/18/1998 18:37:33" upto_link_date="06/18/1998 18:37:33" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\DLGOBJS.DLL" size="81920" checksum="0x8DEE77D0" bin_file_version="4.0.1.23" bin_product_version="4.0.1.23" product_version="1.00.0123" file_description="Dialog Objects Automation Library" company_name="Microsoft Corporation" product_name="Dialog Objects Library" file_version="1.00.0123" internal_name="DlgObjs.DLL" legal_copyright="Copyright © 1987-1995 Microsoft Corp." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x0" linker_version="0x0" upto_bin_file_version="4.0.1.23" upto_bin_product_version="4.0.1.23" link_date="07/26/1997 21:17:41" upto_link_date="07/26/1997 21:17:41" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\MDAC_TYP.EXE" size="8124720" checksum="0x1313836F" bin_file_version="4.71.1015.0" bin_product_version="4.71.1015.0" product_version="4.71.1015.0" file_description="Win32 Cabinet Self-Extractor " company_name="Microsoft Corporation" product_name="Microsoft(R) Windows NT(R) Operating System" file_version="2.0.0.3002.15" original_filename="WEXTRACT.EXE " internal_name="Wextract " legal_copyright="Copyright (C) Microsoft Corp. 1995" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x1" module_type="WIN32" pe_checksum="0x7C210A" linker_version="0x50000" upto_bin_file_version="4.71.1015.0" upto_bin_product_version="4.71.1015.0" link_date="07/15/1997 11:48:12" upto_link_date="07/15/1997 11:48:12" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\CO2C40EN.DLL" size="748160" checksum="0xCCB39FF4" bin_file_version="4.6.1.106" bin_product_version="4.6.1.0" product_version="4.6.1.0" file_description="Crystal Reports OLE 2 UI" product_name="Crystal Reports for Visual Basic" file_version="4.6.1.106" original_filename="CO2C40EN.DLL" internal_name="CO2C40EN" legal_copyright="Copyright (c) 1991-1997 Seagate Software, Inc. All rights reserved." verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x4" verfiletype="0x2" module_type="WIN32" pe_checksum="0xB76A0" linker_version="0x0" upto_bin_file_version="4.6.1.106" upto_bin_product_version="4.6.1.0" link_date="11/06/1996 01:47:53" upto_link_date="11/06/1996 01:47:53" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\MFC40.DLL" size="921872" checksum="0xD2ED39F7" bin_file_version="4.1.0.6038" bin_product_version="4.1.0.0" product_version="4.1.000" file_description="MFCDLL Shared Library - Retail Version" company_name="Microsoft Corporation" product_name="Microsoft (R) Visual C++" file_version="4.1.6038" original_filename="MFC40.DLL" internal_name="MFCDLL" legal_copyright="Copyright (C) Microsoft Corp. 1993-1995" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0xECD27" linker_version="0x40001" upto_bin_file_version="4.1.0.6038" upto_bin_product_version="4.1.0.0" link_date="02/28/1996 06:53:24" upto_link_date="02/28/1996 06:53:24" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\MSVCRT20.DLL" size="253952" checksum="0xECE12C56" bin_file_version="2.11.0.0" bin_product_version="2.10.0.0" product_version="2.10.000" file_description="Microsoft® C Runtime Library" company_name="Microsoft Corporation" product_name="Microsoft® Visual C++" file_version="2.11.000" original_filename="MSVCRT20.DLL" internal_name="MSVCRT20" legal_copyright="Copyright © Microsoft Corp. 1981-1994" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x4D9DB" linker_version="0x0" upto_bin_file_version="2.11.0.0" upto_bin_product_version="2.10.0.0" link_date="06/30/1995 04:55:43" upto_link_date="06/30/1995 04:55:43" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\MSVCRT40.DLL" size="326656" checksum="0x3ABAA4D3" bin_file_version="4.21.0.0" bin_product_version="4.21.0.0" product_version="4.21.0000" file_description="Microsoft® C Runtime Library" company_name="Microsoft Corporation" product_name="Microsoft® Visual C++" file_version="4.21.0000" original_filename="MSVCRT40.DLL" internal_name="MSVCRT40.DLL" legal_copyright="Copyright © Microsoft Corp. 1981-1996" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x516AF" linker_version="0x0" upto_bin_file_version="4.21.0.0" upto_bin_product_version="4.21.0.0" link_date="02/20/1996 01:03:13" upto_link_date="02/20/1996 01:03:13" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\RICHED32.DLL" size="174352" checksum="0x7C865BD8" bin_file_version="4.0.993.4" bin_product_version="4.0.0.0" product_version="4.0" file_description="Windows 95 Rich Text Edit Control" company_name="Microsoft Corporation" product_name="Microsoft® Windows(TM) Operating System" file_version="4.00.993.4" original_filename="RICHED32.DLL" internal_name="richedit" legal_copyright="Copyright © Microsoft Corp. 1986-1996" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0x36A5B" linker_version="0x0" upto_bin_file_version="4.0.993.4" upto_bin_product_version="4.0.0.0" link_date="07/14/1996 23:37:18" upto_link_date="07/14/1996 23:37:18" ver_language="English (United States) [0x409]">
<matching_file name="Wizards\PDWizard\Redist\COMCAT.DLL" size="22288" checksum="0x9CB0587C" bin_file_version="4.71.1460.1" bin_product_version="4.71.1460.1" product_version="4.71" file_description="Microsoft Component Category Manager Library" company_name="Microsoft Corporation" product_name="Microsoft(R) Windows NT(R) Operating System" file_version="4.71" original_filename="comcat.dll" internal_name="comcat.dll" legal_copyright="Copyright (C) Microsoft Corp. 1981-1996" verfiledatehi="0x0" verfiledatelo="0x0" verfileos="0x40004" verfiletype="0x2" module_type="WIN32" pe_checksum="0xF915" linker_version="0x40000" upto_bin_file_version="4.71.1460.1" upto_bin_product_version="4.71.1460.1" link_date="12/05/1996 21:53:54" upto_link_date="12/05/1996 21:53:54" ver_language="English (United States) [0x409]">
|
|
|
|
|
What error? There's nothing here...
RageInTheMachine9532
|
|
|
|
|
CodeProject's forum code doesn't convert < and > to their HTML representation. Please post again, converting < to < and > to >, so we can see the problem.
|
|
|
|
|
Hi,
I am using the COM OBJECT of MSCHART to do a web page, I want to show others the MSCHART capabilities, but I am running into trouble with people that dont have either VB or .NET Framework installed, and they cannot view the chart at all. Is there a way they be able to view the MSCHART without resorting to installing one or the other?
Robert
|
|
|
|
|
You might want to look into generating the chart on the web server, and the sending the image as a .GIF or .JPG. On top of that, the MSCHART control isn't supported in IE because it is a single-threaded component (it works, but any problems go unsupported), and support for MSCHART stopped back in July 1999. Microsoft recommends using the Office 2000 Web components or you might want to check out some of the articles here[^].
RageInTheMachine9532
|
|
|
|
|
Oh ok, never thought about using .JPG or .GIF, I am curious on how to convert a chart into an image file.
|
|
|
|
|
I am in the middle of developing a VB.NET application that interfaces with Excel 2002. I had a hardware problem, so corporate sent me a new computer, but it is loaded with Excel 2003. This caused my Solution's reference to Excel to disappear!
I can't use a reference tothe Excel 2003 library, because none of my users have this version. I loaded Excel 2002 into a different folder than Excel 2003, but I can't find the file that contains the library.
Can anyone tell me how to reestablish the correct reference?
Thanks!
nvmoss
|
|
|
|
|
Hi everyone
Is there a windows or customer control that handle picutes and text, or is there a way to make the text box handle pictures as well. How do you format the layout in text boes so that they r in parargraphs for example or in the the correct layout style that you want it.
Thanks
Vu
|
|
|
|
|
The control System.Windows.Forms.RichTextBox can display both pictures and text in the same control, along with formatting features for fonts, colors, etc.
|
|
|
|
|
Yeah, the RichTextBox control supports images inline in the document. It is basic functionality, but it works. You can search the web for other controls, like RichEdit, but most you'll have to pay for if you want to use them.
RageInTheMachine9532
|
|
|
|
|
Hi everyone
I am in my final yr at uni doing my main project on a program to teach the basics of Word to beginners, it will be it two languages Vietnamese and English. My program will have tests, quizzes and tutorials. I have been playing around with VB.Net and can not decide on how to get the forms to loads the files, and what format to have the files in html, pictures our just a text box. Please can anybody suggest a suitable method for loading files on forms or another of presenting data on forms.
Thanks
Vu
|
|
|
|
|
I'm not totally clear on what you're trying to do. Are you trying to load MS Word documents in a Windows Form? What is the end result?
|
|
|
|
|
How do I add attributes to an assembly that specify
1. That an assembly/class is visible/invisible to COM
2. That a method is visible/invisible to COM
3. That a property is visible/invisible to COM
Jim
|
|
|
|
|
The default is visible.
If you want to hide something, use System.Runtime.InteropServices.ComVisibleAttribute like so:
<ComVisible(False)> _
Public Class MyClass
End Class The same syntax applies to methods and to properties.
However, types are not registered with COM by default. To do so, check 'Register for COM Interop' in the project properties, or use regasm.exe .
|
|
|
|
|
Thats great, thanks very much ;o)
Jim
|
|
|
|
|
Hi
ive created a program that will read a file, check it for the word "error" and then email me with a list of all new errors in the file. im now trying to get the program to read the file every 5 minutes and then send email notification only if there are new errors - could some1 pls help? here's my code so far, which was working until i started to get the timer working!
Imports System
Imports System.IO
Imports System.Collections
Imports System.Web
Public Class Form1
Inherits System.Windows.Forms.Form
Private Shared myTimer As New System.Windows.Forms.Timer
'Private Shared exitFlag As Boolean = False
Private Shared Sub TimerEventProcessor(ByVal myObject As Object, ByVal myEventArgs As EventArgs)
myTimer.Stop()
Dim LineNo As String
Dim CurrentLineNo As New Integer
If GetSetting("OrEM", "Settings", "LineNo") = "" Then
SaveSetting("OrEM", "Settings", "LineNo", "1")
End If
LineNo = Val(GetSetting("OrEM", "Settings", "LineNo"))
Dim objReader As New StreamReader("c:\ProjectSearch\sx3liveALRT.LOG")
Dim sLine As String = ""
Dim arrText As New ArrayList
Do
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
If CurrentLineNo >= LineNo Then
If InStr(UCase(sLine), "MON") Or InStr(UCase(sLine), "TUE") Or InStr(UCase(sLine), "WED") Or InStr(UCase(sLine), "THU") Or InStr(UCase(sLine), "FRI") Or InStr(UCase(sLine), "SAT") Or InStr(UCase(sLine), "SAT") Then
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
If InStr(UCase(sLine), "ERROR") Then arrText.Add(sLine)
While sLine <> ""
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
End While
End If
End If
If Not sLine Is Nothing Then
End If
Loop Until sLine Is Nothing
objReader.Close()
'create mail notification
Dim mailMsg As New System.Web.Mail.MailMessage
mailMsg.BodyFormat = Mail.MailFormat.Text
mailMsg.To = "???"
mailMsg.Subject = "???"
mailMsg.From = "???"
Dim txtBody As String
For Each sLine In arrText
txtBody = txtBody & sLine & vbCrLf
Next
mailMsg.Body = txtBody
System.Web.Mail.SmtpMail.SmtpServer = "???"
System.Web.Mail.SmtpMail.Send(mailMsg)
SaveSetting("OrEm", "Settings", "LineNo", Trim(Str(CurrentLineNo - 2)))
LineNo = Val(GetSetting("OrEM", "Settings", "LineNo"))
' myTimer.Start()
'adds the event and the event handler for the method that will process the timer event to the timer
AddHandler myTimer.Tick, AddressOf TimerEventProcessor
CurrentLineNo = 0
'sets the timer interval to 5 minutes
myTimer.Interval = 30000
myTimer.Start()
'runs the timer, and raises the event
' While exitFlag = False
'Processes all the events in the queue
Application.DoEvents()
'End While
End Sub
Chrissy Callen
|
|
|
|
|
Since I am not sure what OS you are running on I can’t make a concrete recommendation but why not use the available system scheduler that exists in the OS and not worry about that part in your application.
Most OS today offer some type of scheduler to automate tasks running at specific intervals.
Paul Watson wrote:
"At the end of the day it is what you produce that counts, not how many doctorates you have on the wall."
George Carlin wrote:
"Don't sweat the petty things, and don't pet the sweaty things."
Jörgen Sigvardsson wrote:
If the physicists find a universal theory describing the laws of universe, I'm sure the a**hole constant will be an integral part of that theory.
|
|
|
|
|
Hi there Ok, the timers seems fine now, next prob is this: I want the program to email only if the file contains new "errors" but NOT to email if there are no new instances of the "error" word. so i wrapped the mail code in if sline <> "" then ... (mail code)...end if and it doesnt seem to mail at all now (i added errors manually to the file to check it). Could u pls tell me where im going wrong? Thanx!
Imports System
Imports System.IO
Imports System.Collections
Imports System.Web
Module Module1
Sub Main()
Dim myTimer As New System.Timers.Timer
Dim LineNo As String
myTimer.Stop()
Dim CurrentLineNo As New Integer
If GetSetting("OrEM", "Settings", "LineNo") = "" Then
SaveSetting("OrEM", "Settings", "LineNo", "1")
End If
LineNo = Val(GetSetting("OrEM", "Settings", "LineNo"))
Dim objReader As New StreamReader("filename")
Dim sLine As String = ""
Dim arrText As New ArrayList
Do
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
If CurrentLineNo >= LineNo Then
If InStr(UCase(sLine), "MON") Or InStr(UCase(sLine), "TUE") Or InStr(UCase(sLine), "WED") Or InStr(UCase(sLine), "THU") Or InStr(UCase(sLine), "FRI") Or InStr(UCase(sLine), "SAT") Or InStr(UCase(sLine), "SAT") Then
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
If InStr(UCase(sLine), "ERROR") Then arrText.Add(sLine)
While sLine <> ""
sLine = objReader.ReadLine() : CurrentLineNo = CurrentLineNo + 1
End While
End If
End If
If Not sLine Is Nothing Then
End If
Loop Until sLine Is Nothing
objReader.Close()
If sLine <> "" Then
'create mail notification
Dim mailMsg As New System.Web.Mail.MailMessage
mailMsg.BodyFormat = Mail.MailFormat.Text
mailMsg.To = "me@co.uk"
mailMsg.Subject = "name"
mailMsg.From = "name"
Dim txtBody As String
For Each sLine In arrText
txtBody = txtBody & sLine & vbCrLf
Next
mailMsg.Body = txtBody
System.Web.Mail.SmtpMail.SmtpServer = "server"
System.Web.Mail.SmtpMail.Send(mailMsg)
End If
SaveSetting("OrEm", "Settings", "LineNo", Trim(Str(CurrentLineNo - 2)))
LineNo = Val(GetSetting("OrEM", "Settings", "LineNo"))
CurrentLineNo = 0
myTimer.Interval = 30000
myTimer.Start()
End Sub
End Module
Chrissy Callen
|
|
|
|
|
Hello all!
I have a problem with my application.
After completion of my program, when I install it to some other PC & try to run it, it gives me "path not found error" for database file. I have used Ms Access file as my backend.
I use Data Adapter Configuration Wizard to make Oledbadapter, Oledbconnection & Dataset. I then realize that the path of my backend file is set according to my computer's path. Someone told me to use Application.Startuppath in connection string.
Now I want to know here how to use it, & specially where to use it?
As I have mentioned earlier that I use wizard to make connection object, I copy the connection string from oledbconnection's property window & copy it to my form's load event like so (but I didn't delete the Oledbconnection object):
Dim cnn as new oledbconnection
dim path as string = application.startuppath & "\" & "Database.MDB"
cnn.connectionstring="........, Data source=" & path & ",..........
But this thing didn't work here. I still got path error, or sometimes I got this error "Object reference not set to an instance of an object."
Isn't there a way by which I can solve this problem? I am using wizard as I am not so familier with VB.NET.
Can anyone help me to complete my project.
Thanx in advance.
|
|
|
|
|
A couple of questions...
Is the Database.MDB file shared on a server somewhere or is it local to the client machine?
If it is supposed to be local, is the file part of the installation?
If it is part of the install, where is the file being written to?
RageInTheMachine9532
|
|
|
|
|
The file is not shared, its local to client system.
I want to deliver this database file to my client, so I added it while I develop my setup & package. So when the setup is run, the file is also installed to application's folder.
Now for your last question, sorry I don't understand what you want to say. Its a simple Ms Access file having some tables & relationships between them. That's it. I just want to deliver this file alongwith my application so I add it with the application.
Waiting for reply.
Thanx...
|
|
|
|
|
Are you absolutely sure the database file is being written to the same directory as your .EXE?
RageInTheMachine9532
|
|
|
|
|