|
If you want to write to an O/S filesystem (text) file - see help on file streams and text files (I assume you do not need this). See System.IO namespace.
To log to the windows event log (I assume this is what you want something like this):
Private Shared Sub WriteToAppLog( _
ByVal message As String _
, ByVal messageType As EventLogEntryType _
)
Dim elLog As System.Diagnostics.EventLog
Try
elLog = New System.Diagnostics.EventLog( _
"Application" _
, Environment.MachineName _
, Application.ProductName _
)
elLog.WriteEntry(message, messageType)
Catch ex As Exception
'Your error handling here
End Try
End Sub
I suggest you write a reusable application-message class handling messages to user/screen, text log file or Windows Event log (or any combination there in).
Use <flags()> designation before your enum declaration to "OR" these options together in a bitwise fashion.
Good luck,
-Len
Thanks,
-Len Miller
"If I had eight hours to chop down a tree, I'd spend six sharpening my axe."
-Abraham Lincoln
|
|
|
|
|
A basic implementation for this is already provided in the framework. The TraceListener class might be a good start for reading. If you need something more sophisticated you should have a look at NLog. This article describes the basics for using it.
|
|
|
|
|
hi,
i created a serviced component but i cant run the program it says: Access is denied. and i cant send a message to the application log. i even tried shutting down the serviced component in the com+ catalog, i just installed it in assembly (using gacutil.exe) but i'm still getting the error and no message is being created on the application log. i tried configuring my HKEY_....
but nothing happened  ....please help!
|
|
|
|
|
Hello There
What you are doing is creating a reference by the keyword New like
Dim obj as new myproject.Myclass
but infact you have to use this
dim obj as object
obj=createObject("myproject.myclass")
' secondly are you registering the component through Vs.Net Command prompt. then dont do that. I had a problem with this that even if there is some thing wrong with the component it registers it by force. so register it through Component Service in GUI environment.
hope this helps.. if not then I am still here
cheers........
|
|
|
|
|
thanks for your reply  i figured it out already i unchecked the Enforced acess check box in the service component i created. i thought registering it in the command prompt is safe...oh well still need to learn a lot of things...
btw, do you know how can i create a new table in a sql server database?
|
|
|
|
|
for creating a table use the same way as you use to execute any query for insert or update. like this
' where cmd is command object
cmd.commandtext=="Create table tablename ....."
cmd.executenoquery()
|
|
|
|
|
Hi.
I have a screen that allows navigation via (first, prev, next, last) using a BindingManagerBase. It is actually a control that I made that is being passed a bmb upon instantiation.
Now, if someone attempts to navigate off the record, I check to see if there are any changes first. Something like this:
...
BindingContext(ds).EndCurrentEdit()
return ds.HasChanges
...
I ask the user if they want to save, disregard changes or cancel. If the user picks disregard changes, I do something like this.
...
ds.rejectChanges
...
Immediately after that line of code, ds.hasChanges = False.
The problem is, after control goes back to the app, and the user tries to navigate again, ds.hasChanges=TRUE??? 
As far as I can tell, I am not changing any data in any of my events or other code. Is there something that I am missing?
The user will keep getting told they have changes even though they asked to disregard them. 
Any help would be appreciated!
Thanks!
Thanks,
-Len Miller
"If I had eight hours to chop down a tree, I'd spend six sharpening my axe."
-Abraham Lincoln
|
|
|
|
|
Hi,
Im relatively new at programming, but I just want to know if my project idea can be accomplished or not.
I have a relational paradox database that is representing a photolibrary for the company I am working for. I am trying to develope and application that will be able to search the database, generate a list of thumbnails based on the search criteria. I want to be able to click on the thumbnail and pull up additional information stored within the database.
After I have selected a photo I then want to be able to attach the jpg file of the image as an email attachment.????
I would like to accomplish this in vb.net and then hopefully later on develope it into a asp.net project.
what are your suggestions ? pointers... can i connect to a paradox database using vb.net?
and is the email feature doable?
I would love any feedback or suggestions you have...
you could email directly or reply to this message.
sheldonj@gmail.com..
Thanks, James
|
|
|
|
|
Find a Paradox news group. I quicly found information here:
[^]
Just some ideas on connecting and version.
I assume OleDB may work, or, at the very least ODBC.
yes, what you would like to do is very common. Just build an app with attribute information about the images (name, author, type, ID, path?, content, description, etc. etc.)
You will then either store the images, or store thumbnails and paths to the images. people can then search on the attrubute information described above.
The key will obviously be to determine what type and types of users and photos are being dealt with, what will be and needs to be searched. and network information (is this web, client server?)
etc.
have fun!
-Len
Thanks,
-Len Miller
"If I had eight hours to chop down a tree, I'd spend six sharpening my axe."
-Abraham Lincoln
|
|
|
|
|
I am very new to vb.NET.
Can anybody please explain to me how you go about using Masked Edit Control with a MS Access 2000 Database?
Prior to starting with Masked Edit control I was using ordinary Text boxes to transfer the information from the Database to the Form and back again, at that time everything was working perfectly.
I have just started to introduce Masked Edit control to the Form. I require the use of:
Long Dates to produce: 17 June 2005 dd MMMM yyyy
Telephone Number: (01280)5841256 (####)#######
Currency £: £10,000.00 £######.##
Postcode: SS7 7LL ????????????
Manes with stating with capitals and everything else lower case. Tom ??????
I can get the Masked Edit Control working on the Form, the problem I have is for example. If I execute a search of a record on the Form (SELECT Query) the Masked Edit Control boxes remain blank.
I'm using Visual Studio.NET, Version 2003 and Microsoft Masked Edit Control, Version 6.0. I have placed it in the Visual studio Toolbox, I have then gone to Properties, The Database table and the Regional & language Settings (XP), setting them all to a Long Date format: dd MMMM yyyy. I am now well and truly stuck, Can anybody tell me what I need to do the resolve my problem.
I came across this web site trying to get the answer and I have used the procedure explained in the document
http://www.functionx.com/vcsharp/controls/maskedit.htm
The Error messages and states that I’m getting with each of the SQL commands are:
SELECT: Does not view the data brought from the Database to the Masked Edit Text box.
INSERT: Error Message ‘Data type mismatch expression’.
UPDATE working OK around the Masked Edit Text box that is not operational.
DELETE is working fine.
Here's hoping somebody can help, I can send the Database and Form if required?
Thank you in advance
jetski4419
jetski4419
|
|
|
|
|
I have never used this component in .net but as far as i can remember from VB6 there are a few other properties which will be responsible for your problems.
somewhere there are properties for the placehoder (what you see before you put in the text which is commonly an underscore. eg for the phone number would be '(____)_______'),wether or not to include the placeholder in the text and wether or not to include the literals (in the case of your phone number mask the ()) in the text.
These can cause problems. Eg if the literal '£' is saved with the currency value the DB will complain because Vb will not convert '£10000' from a string to currency. Also if the placeholder is saved you could end up with a '(01245)49367_' for a phone number. If that is a number field the problems would be the literals '()' and the placeholder '_' (OK bad example but you see where i am going).
You need to be careful with this control. The best thing is to set the mask (format) just as the control gets the focus (otherwise it may not accept a value from the DB if it is not in the corrdct format) then unset it and check the text in the validate event. SQL is not forgiving with junk characters and the masked edit control is probably worse.
The long and short of it is dont think that by using this control you can get away without performing any validation of the data because you wont.
Jon
|
|
|
|
|
I want to start on a program that takes in various measurements of square areas, then should graphically display the optimized way of arranging the objects, so to fit the most objects into a set area.
If anyone has got any ideas on algorithms or related sites I can visit to find out more, pls feel free to comment...
Thanx
|
|
|
|
|
I am working on a application that uses the MyApplication_UnhandledException event to basically tell the user that I screwed up somewhere...see below
Private Sub MyApplication_UnhandledException(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.UnhandledExceptionEventArgs) Handles Me.UnhandledException
MsgBox(e.Exception.Message.ToString)
e.ExitApplication = False
End Sub
My test app that I was working on has 3 controls on it, A menu bar, textbox, and datagrid. The app will take what I have in the textbox aka SQL Query, then use the dataadapter to fill a dataset then bind it to the datagrid. Here is where it gets weird, or at least I have no idea why this happens... First here is my code...
I have a SQL class, which takes the query, and connection string and returns a datatable
Imports System.Data
Imports System.Data.SqlClient
Public Class SQL
Private pResults As New DataTable
Private pQuery As String
Private pConnStr As String
Public ReadOnly Property Results() As DataTable
Get
Return pResults
End Get
End Property
Public Sub New(ByVal ConnStr As String, ByVal Query As String)
pConnStr = ConnStr
pQuery = Query
End Sub
Public Function ExecuteQuery() As DataTable
Dim DBConn As SqlConnection
Try
DBConn = New SqlConnection(pConnStr)
DBConn.Open()
Dim adp As New SqlDataAdapter(pQuery, DBConn)
adp.Fill(pResults)
Return pResults
Catch ex As Exception
Throw ex
Finally
DBConn.Close()
End Try
End Function
End Class
Also here is my main body of the testForm, the menubar has two items one Parent (File) then a child node of Run with a shortcut key set to Ctrl+R
Private Const CONNECTION_STRING As String = "uid=sa;password=SomePassword;initial catalog=SomeDatabase;data source=wwwsql01,1433;connect timeout=15;persist security info=false;network library=dbmssocn"
Private Sub RunToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RunToolStripMenuItem.Click
RunQuery()
End Sub
Private Sub RunQuery()
Dim qry As New SQL(Me.CONNECTION_STRING, TextBox1.Text)
qry.ExecuteQuery()
DataGridView1.DataSource = qry.Results
End Sub
Very simple... If I run it as is and an exception is thrown when I press Ctrl+R while in the textbox, the unhandled exception handler will take over and show me the exception but then place an "r" into the textbox. If I hit Ctrl+R from the datagrid all is fine. If I use the mouse to click on Run all is fine. So If I place a Try Catch around where I call RunQuery() and do not use the MyApplication_UnhandledException but show a messagebox in the Try Catch instead...The "r" as mentioned above does not show up at all. Would anyone know the reasoning behind this? This app is nothing special just a small test before I develop the larger version. All it does is run a SQL query... Thanks in advance for anyhelp that you may be able to offer.
The network is down...let's go get bagels.
|
|
|
|
|
How can I copy the selection of files from the listbox to a desire destination. Is it possible?
In other words I have the file listing from my desire folder, i can select them, no problems, but how can i move or copy my selection from the listbox to a desire destination.
Can I copy: source from listbox listing (c:\windows\mytext.txt) to like dest:(e:\data\mytext.txt).
I need help.
|
|
|
|
|
You're not very specific about what your having a problem with.
Yes you can copy files and directories. All the ListBox will give you, though, is a list of filenames. It will NOT copy the files for you. For this, you'll have to use the File and Directory classes in the System.IO namespace.
Or are you having a problem with how to let your users specify where to copy the files/directories to?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
Dim filename As String
Dim newfilepath As String = "c:\data\"
If Not Directory.Exists(newfilepath) Then
Directory.CreateDirectory(newfilepath)
End If
For i = 0 To ListBox1.SelectedItems.Count - 1
filename = Path.GetFileName(ListBox1.SelectedItems(i).ToString)
newfilepath = newfilepath & filename
FileCopy(ListBox1.SelectedItems(i).ToString, newfilepath)
Next
End Sub
|
|
|
|
|
The textbox on my form does not update the underlying database table.
I created a form with a textbox, a datagrid, and a save button. Using the wizard I created a connection to an Access database, a dataadapter, and dataset.
Then I set the datagrid up to read data from the table and the button to update those changes. That all works fine.
For the textbox I set the text databinding to a field in the database and it does display the correct information. But, if I change the textbox value and execute the dataadapter update the changes do not take. Also, the HasChanges property is false even though I changed the value. How can I get the new textbox value to write back to the table? Thanks for any help!
|
|
|
|
|
This is the code that I got a couple of days from these forums. I have 24 textboxes that this needs to go to. Is there an easier way to get them all in one function/sub or do I have to have 24 different subs?
Private Sub txtBDrain_KeyPress(KeyAscii As Integer)
KeyAscii = LimitTextInput(KeyAscii)
End Sub
Function LimitTextInput(KeyAscii) As Integer
If ((KeyAscii < Asc("0")) Or KeyAscii > Asc("9")) _
And (KeyAscii <> 8) And (KeyAscii <> 13) And (KeyAscii <> 46) Then
LimitTextInput = 0
Else
LimitTextInput = KeyAscii
End If
End Function
|
|
|
|
|
In VB6, you'll have to have 24 different subs. In VB.NET, you can have one sub that handles the same event for all 24 TextBoxes.
But, in either case, since you're using so many of these numeric-only TextBoxes, you're better option would be to make your own TextBox control, inheriting from the standard TextBox and putting this code in that control. Then you can place 24 of the new textboxes on your form without having to worry about this problem.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
can someone tell me why this error occurs when clicking on the Add new record button! I have a database which i am accing this mdb from vb.net. I made everything good with data set, data adapter and connection to the db. this error occurs:
cannot create a child list for field fastMax Orders. why is this??
|
|
|
|
|
Sounds like a master-detail relationship?
How is the relationship defined?
Is the spelling correct on all column names? Need more info
Thanks,
-Len Miller
"If I had eight hours to chop down a tree, I'd spend six sharpening my axe."
-Abraham Lincoln
|
|
|
|
|
No i have 1 table only! all the names are in good format and they are linked correctly as i can see. I have the dataset dataadapter and connection good!
|
|
|
|
|
I have one question:
In Help about odbcDataAdapter.Update Method is write text:
Calls the respective INSERT, UPDATE, or DELETE statements for each inserted, updated, or deleted row in the DataSet.
And when is calling SELECT statement?
I need sometimes calls on my odbcDA select command, which refresh my DataSet. Update can not I call, in my Table is not change, but in Dataset I take data from RelAted Table.
Julo
Julo Jenis
|
|
|
|
|
Update doesn't call a SELECT statement. It's used for UPDATING. All three SQL statements make changes, or UPDATE, the database.
When do you call the SELECT statement? Here's a hint: How did you fill your dataset in the first place?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
You need to do OdbcDataAdapter.Fill(dataset)
This will use the select command to fill the dataset
Thanks,
-Len Miller
"If I had eight hours to chop down a tree, I'd spend six sharpening my axe."
-Abraham Lincoln
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
