Visual Basic

Re: Opening Multiple Files

1-Feb-06 6:52

Your probably looking for

<a href="http://msdn2.microsoft.com/en-us/library/07wt70x2.aspx" rel="nofollow">Directory.GetFiles</a>[<a href="http://msdn2.microsoft.com/en-us/library/07wt70x2.aspx" target="_blank" rel="nofollow" title="New Window">^</a>]

in the System.Io namespace. GetFiles will return an array of Strings with the filenames of everything in the directory. You just enumerate the collection just like any other.

Imports System.Io
.
.
.
For Each filename As String In Directory.GetFiles(targetDirectory)
    ' Your code to process the file goes here.
Next

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

GeorgieMPorgie1-Feb-06 7:18

GeorgieMPorgie

1-Feb-06 7:18

Thanks. I'll give that a try.

George

Security policy problem

luciodandrea1-Feb-06 6:01

luciodandrea

1-Feb-06 6:01

Hi! i'm developing an application under VB.NET...while i test it on my computer, everything works fine...but when i try to open it on another computer, an error occurs...the error says something like:
"The application attempted to perform an operation not allowed by the security policy. The operation required the SecurityException.....etc"

Then it says that i should grant the application using the .NET security administration tool...do i have to install this tool on EVERY machine in which i want to run my app??? how do i solve this issue???
thanks!!!

Re: Security policy problem

Dave Kreskowiak1-Feb-06 6:45

Re: Security policy problem

1-Feb-06 6:45

You're apparently trying to run the app from a network drive/share. Network sources are not trusted and run under greater security control that if the code was launched from a local hard drive.

Yes, you'll have to either:

a) Install the app locally on each machine.

b) Modify the security trusts on each machine to tell it to trust network-sourced code. How you do this depends on your networking environment, but is usually done with policies.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

luciodandrea2-Feb-06 0:36

luciodandrea

2-Feb-06 0:36

you're right...i was mapped into a drive and running the app from that drive...now, my new question is...
the app is like a resources monitor, that is, it warns an administrator when, for example, some directory has grown a lot in size, or when the free space of one of it disks is low...etc...
the app runs on a server, and monitors a lot of networked PC's and servers...will i have to install the tool on every monitored pc???? because i think it's not very viable to do that, since there are more than 500 pc's to monitor...
thanks!!

Re: Security policy problem

Dave Kreskowiak2-Feb-06 1:38

Merging DATASET (Duplicating Rows)

2-Feb-06 1:38

Like I said, you have two options.

1) Either install it on all the PC's. I hope you have a software distribution system...

or

2) You'll have to modify the security policies to tell the machines to trust network-sourced code.

I suggest you read up on Code Access Security[^], specifically Security Policy Best Practices[^].

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

AlexeiXX31-Feb-06 4:53

Merging DATASET (Duplicating Rows)

1-Feb-06 4:53

Hi all, im having a little problem with this method, im merging two datasets (same table, im just trying to refresh a table, just in case it has been changed by someone else), and it duplicates rows, i think it must be because of the primary keys, Arent primary keys supossed to be in the dataset since I opened the table?? Here is my code:
*OpenTbl is just a function that returns a datatable

ds1.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
ds2.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
ds1.Merge(ds2)
Me.DataGridView1.DataSource = ds1.Tables("Adscripciones")
===========The previous code duplicates rows

ds1.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
Dim Key(1) As DataColumn
Key(0) = ds1.Tables(0).Columns(0)
ds1.Tables(0).PrimaryKey = Key
ds2.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
ds1.Merge(ds2)
Me.DataGridView1.DataSource = ds1.Tables("Adscripciones")
==========This wont duplicate, but i have to specify primary keys, and i wouldnt like that since im trying to make a generic routine to open tables.
Is there any way to get primary keys information and use it for the merge method without specifying primary keys??
I hope anyone can help me, Ill apreciate it
Thank You

Alexei

AlexeiXX31-Feb-06 5:21

Re: Merging DATASET (Duplicating Rows)

1-Feb-06 5:21

I forgot to say im using SQL 2000 and VB.NET 2005

AlexeiXX31-Feb-06 5:22

1-Feb-06 5:22

I forgot to say im using SQL 2000 and VB.NET 2005

I know how, Thank Anyway

AlexeiXX31-Feb-06 6:18

VB6 : HOW TO LINK DATA BETWEEN 2 FORM

1-Feb-06 6:18

I found out how to automatically get primary keys Laugh | :laugh:

Anyways, i just wanted to post it here, just in case someone else needs it.
On the dataadapter, just set the da.MissingSchemaAction = MissingSchemaAction.AddWithKey
Example:
==================
Dim ds1, ds2 As New DataSet
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ds1.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
ds2.Tables.Add(OpenTbl("SELECT * FROM Adscripciones", "Adscripciones"))
ds1.Merge(ds2)
Me.DataGridView1.DataSource = ds1.Tables("Adscripciones")
End Sub

Public Function OpenTbl(ByVal SQL As String, ByVal NombreDeTabla As String) As DataTable
Dim da As New SqlDataAdapter(SQL, conn)
Dim T As New DataTable
Try
'I was missing this line at the beggining
da.MissingSchemaAction = MissingSchemaAction.AddWithKey
da.Fill(T)
T.TableName = NombreDeTabla
Catch ex As Exception
Return Nothing
End Try
Return T
End Function
===========================

Thank anyways

Alexei
Its good to know that theres always someone willing to help others

steventry1-Feb-06 4:16

steventry

1-Feb-06 4:16

Currently, I'm doing a project using VB6. Now, I've create 2 forms, let's say Form1 and Form2. Now, I have done the link between these form. User can click on a button in Form1, then a "pop up" of Form2 is appears. So the user can key in their value here in textbox (in Form2) for example (for other mathematics calculation stuff). The problem here is...HOW I can display what the user "key-in" in the Form2 will be display too in Form1 . Please give the code.

Hopefully to hear from you A.S.A.P, Thank You Smile | :)

Than You

-- modified at 10:21 Wednesday 1st February, 2006

militiaware1-Feb-06 4:28

militiaware

1-Feb-06 4:28

if I understand what you mean, here's the solution:
make a global variables, 4Ex:

module main
dim objFrm1 as new Frm1
dim objFrm2 as new Frm2
Dim GV_key as string
sub main()
GV_key = objfrm1.key
objfrm2.key= GV_Key
end sub
end Module

Militiaware
Faris Madi

Colin Angus Mackay1-Feb-06 5:54

Colin Angus Mackay

1-Feb-06 5:54

militiaware wrote:
make a global variables

Global variables!!! NO! NO! NO! NO! NOOOO!!!

Jeez, don't they teach that this is bad practice in CS classes any more? Sigh | :sigh:

ColinMackay.net
"Man who stand on hill with mouth open will wait long time for roast duck to drop in." -- Confucius
"If a man empties his purse into his head, no man can take it away from him, for an investment in knowledge pays the best interest." -- Joseph E. O'Donnell

Dave Kreskowiak1-Feb-06 6:02

1-Feb-06 6:02

militiaware wrote:
make a global variables

:SMACK:

That's REALLY bad practice!

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

nata20061-Feb-06 22:59

nata2006

1-Feb-06 22:59

Sorry Faris Madi!
I disagree with you strongly! It is a very bad programing practice to use global variables to pass data between classes (forms). Use events instead!
Supose you have a TextBox on one form and you want to inform the other form whenever it's contents was changed - raise an event with the changed contents as an argumet.
You need to declare the event on the form where the TextBox resides. Then, you need to have a "withevents" variable referencing that form within the second form. Then, attach an event handling procedure on the second form to handle what's need to be done whenever the TextBox's contents changes and the event is raised.
Hope I've helped here.

Walk the way. Top down.