|
Please let me know how to resolve the above issue
Thanks in advance
|
|
|
|
|
What does that mean? And what does it have to do with Visual Basic?
|
|
|
|
|
Hi,
I found this code on the internet. but now I want to know of a member is a group or a normal login. Someone has an idee how to find this info?
Jan
Set cmd = CreateObject("ADODB.Command")
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
cn.Open "Provider=ADsDSOObject;"
cmd.CommandText = "SELECT adspath,cn from 'LDAP://" & getNC & _
"' WHERE objectCategory = 'Group' and cn = '" & groupname & "'"
cmd.activeconnection = cn
Set rs = cmd.Execute
'
'**
' process the results of the query into our arrays for later
'**
'
i = 0
While rs.EOF <> True And rs.bof <> True
grouppaths(i) = rs.fields("adspath").Value
groupnames(i) = rs.fields("cn").Value
rs.movenext
i = i + 1
Wend
cn.Close
If i = 0 Then
MsgBox "Nothing Found, Exiting"
Exit Sub
End If
Application.StatusBar = "Records Found..." & i
'
'**
' Turn off updates and calculations
'**
'
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.DisplayStatusBar = True
'
'**
' found something so create the output files and write the headers
'**
'
Application.StatusBar = "Creating Worksheet headers..."
If i > 0 Then
Set objsheet = Worksheets(blad)
For h = 1 To 2 '1 To numheader2
objsheet.Cells(1, h) = headers2(h)
objsheet.Cells(1, h).Font.Bold = True
Next
End If
'
'**
' now process each group found and extract all members
'**
'
cl = 1 'count lines
gl = 1 'group lines
Application.StatusBar = "Populating Worksheets..."
For j = 0 To i - 1
Application.StatusBar = "Writing Group " & j & " of " & i
Set objgroup = GetObject(grouppaths(j))
cl = cl + 1
groupname.Offset(, 1) = objgroup.Members.Count
c = objgroup.Members.Count
g = 0
Set objsheet = Worksheets(blad)
If objgroup.Members.Count > 0 Then
For Each objmember In objgroup.Members
g = g + 1
Application.StatusBar = "Writing Group Details " & g & " of " & c
gl = gl + 1
objsheet.Cells(gl, 1).Value = groupnames(j)
objsheet.Cells(gl, 2).Value = Right(objmember.name, Len(objmember.name) - 3)
objsheet.Cells(gl, 3).Value = objmember.OperatingSystem
objsheet.Cells(gl, 4).Value = objmember.distinguishedName
Next
Else
gl = gl + 1
objsheet.Cells(gl, 1).Value = groupnames(j)
For h = 2 To 2 'numheader2
objsheet.Cells(gl, h) = NoEntry
Next
End If
Next
|
|
|
|
|
What do you mean by "member of a group" and a "normal login". Those concepts don't have anything to do with each other.
Also, you might want to study the code you downloaded. Nobody is going to write your code for you and fix whatever is wrong or what you want in this script.
|
|
|
|
|
I have used some wrong word i guess
inside a AD group there can be another AD (sub)group
now I want to know of the "children" in a group are simply accounts or (sub)groups
example:
in a big firm there a employers with different languages (in Belgium nlb, FRb end geb)
in these 3 groups you have all workers of the firm so we've created a group with 3 subgroups and automatic into that big group that have only 3 subgroups, practicaly that group contains ±40000 accounts
Jan
|
|
|
|
|
Hey everyone I am trying to do a logon script with server 2008 to open a picture file for me in School I already have computer science classes but now I am in networking.
Const MAXIMIZE_WINDOW = 3
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "calc.exe", MAXIMIZE_WINDOW
Thats my extent of remembering wscripting haha thats is to do a simple log on script.
I need help wednesday is my final!
|
|
|
|
|
Member 12141451 wrote: I need help wednesday is my final! Then you need to explain your problem in better detail by Tuesday.
|
|
|
|
|
I have Excel 2007 installed on both my Windows 7 and Windows 8.1 computers. On Windows 7, a class library built with VS 2010, com visible, and registered for com works as expected. The class has the required interface to work with com. However, I copied the complete library project to the Windows 8.1 computer, and built the library with VS 2013. The library is properly registered and com visible and shows in the Excel VBA project as a reference. All the functionality is displayed through Excel's Object Explorer. But the VBA code fails with the line to set the object to to a new instance of the class. The error message given is that "class does not support automation or does not support expected interface". I have no idea how to fix the problem. I have tried everything I know to do without success. Here is the code snippet where the problem occurs.
1 Dim myPipe As TwoPhaseFlowCom
next line fails
2 Set myPipe = New TwoPhaseFlowCom
3 Call myPipe.NewFlow(WV, DV, VV, WL, Dl, LV, STEN, D)
I tried to register the dll built with VS 2010 on the Windows 7 machine on the Windows 8.1 machine. But all attempts to register failed.
Any suggestions on how to remedy the problem is appreciated.
Bobby
|
|
|
|
|
Are there any run-time dependencies you might have missed?
Try downloading the SysInternals Suite[^] from MS TechNet - it's free and incredibly useful for tracking down problems like this. Have a look at the Process Explorer and Process Monitor parts of the suite - doesn't take long to get up and running.
|
|
|
|
|
How do you make a shopping cart using visual basic
|
|
|
|
|
You can use the same principles you'd use doing it using C#.
Seriously, your question is far too broad - there are dozens of different ways of doing it. It's up to you to research them and choose an approach that suits your skills and needs.
|
|
|
|
|
You use secret code 54-3B.
The difficult we do right away...
...the impossible takes slightly longer.
|
|
|
|
|
Now it is no longer a secret
Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
|
|
|
|
|
Hello.. i just want to ask is there any particular parameter in vb.net that able to create a modelling which is consist of particle that users define the behavior and the particle itself will act based on following codes and input data..? Thanks
|
|
|
|
|
By default in VB.NET there is no such thing, and as far as my understanding is concerned I still don't get what you want to achieve.
Everything needs to be passed, and the particles, if you are talking about graphics, would take much more than just simple VB.NET. VB.NET itself doesn't know much about anything, everything needs to be shared with it. Also, where are the "following codes and input data"?
The sh*t I complain about
It's like there ain't a cloud in the sky and it's raining out - Eminem
~! Firewall !~
|
|
|
|
|
Not out of the box, this seems like the basis of an application.
you would need to define the object, what data it would hold. Potential characteristic etc that you would need to hold / map
and how you would want the data to be used? animation or just simple math to show its aging etc.
Every day, thousands of innocent plants are killed by vegetarians.
Help end the violence EAT BACON
|
|
|
|
|
hello sir.. the program that i would like to do is much similar to bouncing ball application.. we define its shape characteristics and of course different in context of its movement by default bouncing ball is random moving but i want to create its own movement based on some codes of course. its just i want create the ball much more smaller in one box of window most probably can fit more ball generally speaking but much smaller. and the users will trigger the movement by some parameter inserted in the applications.
|
|
|
|
|
OK, since you didn't ask a question at all or even define a problem you're having, you must be asking for permission, so, please, proceed with your project and let us know how it goes.
|
|
|
|
|
that is for defining more information on the topic. to doing that, i have no problem with the coding its just im usually comfortable with database programming but not integrate it with some analysis modelling so this is first for me. i seek tips from you guys on how this process can be done if it is possible or you guys can share other related information it would be great.
|
|
|
|
|
Read Simons latest reply.
|
|
|
|
|
you started by defining the a brief overview of the system, now define what / how you want the application to behave.
expand on how the ball starts to move?
what information should it take to make the ball move?
how much space does the ball have to bounce in?
what happens if the ball hits the limits of this space?
etc.
Every day, thousands of innocent plants are killed by vegetarians.
Help end the violence EAT BACON
|
|
|
|
|
Hai All,
Here I Used windows.Datagridview in VB.Net. I need third party tool of datagrid because specify cell focus,enter key to choose from list,Date time picker in Etc......so tell about me Name of cheep and best tool or Free datragrid
|
|
|
|
|
Microsoft's DataGridView is the best free one. Google will find you alternates.
|
|
|
|
|
|
Good day friends! I need your help. I and my group have the following task "design and implementation of wireless communication software using visual studio 6.0". The major goal of this app is to send files from one pc(server) to another(client). We created the software using winsock control and tested it in the system and it worked fine. Then we created a ad hoc wireless network then added another pc to this network. We installed the client.exe in the client pc and set the RemoteHost address to the server's IP address. We click on connect on the pc(client). But when we tried to send files from server pc to client pc error always appears saying Runtime Error: 40006. I edit this solution has not be found. Help please.
modified 5-Dec-15 2:51am.
|
|
|
|