|
|
Now I've run into another issue, I get this error when running the script.
User LDAP://CN=First Last,CN=Users,DC=Domain, DC=local Get LastLogon Failed. The directory property cannot be found in the cache.
|
|
|
|
|
I am making text to speech converter in vb.net. I want a sliding volume button for the volume adjustment, I have tried it but its not working and I want one button which works for both pause/resume together with a timer that shows how much the time is taken in reading text. Please help me with simple and easy codes it would solve my problem because its my project and here is my code for tts:
Public Class FormTTS
Public SAPI = CreateObject("SAPI.spVoice")
Public Paused As Boolean = False
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
Const KEYEVENTF_KEYUP As Long = &H2
Private Sub btnread_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnread.Click
SAPI.Speak(TextBox1.Text, 3)
TextBox2.Text = "0"
Timer1.Interval = 500
Timer1.Enabled = True
If TextBox1.Text = "" Then
MessageBox.Show("You didn't fill in the fields!")
End If
End Sub
Private Sub btnpause_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpause.Click
If Paused = False Then
SAPI.Pause()
Paused = True
ElseIf Paused = True Then
SAPI.Pause()
Paused = False
End If
Timer1.Enabled = False
End Sub
Private Sub btnstop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnstop.Click
SAPI.Speak(vbNullString, 2)
End Sub
Private Sub btnresume_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnresume.Click
SAPI.Resume()
Timer1.Enabled = True
End Sub
Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click
Dim Response As Integer
Response = MsgBox("Are You Sure You Want To Close The Program", vbYesNo, "Exit")
If Response = vbYes Then
Close()
Else
Me.Show()
End If
End Sub
Private Sub btnvol_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnvol.Click
Call keybd_event(System.Windows.Forms.Keys.R, 0, 0, 0) 'R down
Call keybd_event(System.Windows.Forms.Keys.R, 0, KEYEVENTF_KEYUP, 0) 'R up
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox2.Text = CInt(TextBox2 .Text) + 1
End Sub
End Class
|
|
|
|
|
Hey,
is there a thing to do httpwebrequest trought a socks 5 proxy ?
Sorry for my english :-S
Regrads
|
|
|
|
|
|
I wish to design a small application to read very lengthy datas in a single page with scrollable manner...
I mean, in single page 3-Datagridviews and some pages of text needed to read from a split container....
For that I wish to have a lenghty form to achieve it in a single page through scroll bar...
Does any body can show the details..... VS-2010
Thanks ![Rose | [Rose]](https://codeproject.global.ssl.fastly.net/script/Forums/Images/rose.gif)
|
|
|
|
|
The DataGridView has something called "virtual mode". Instead of databinding (and the overhead), it simply requests the values that should be on-screen. That means that you can display the first records immediately after loading them. There's a walkthrough[^] on MSDN.
For it to work nicely, you'd load your data on a separate thread, using a reader, and synchronize every now and then (every second or every 100 items).
Bastard Programmer from Hell 
If you can't read my code, try converting it here[^]
|
|
|
|
|
Thanks Eddy....All your helps are very much useful....
Thanks Again from Paramu @ Paranthaman
|
|
|
|
|
My pleasure, and thanks for the kind words 
|
|
|
|
|
Dear Sir,
How to maximize MDIParent and MDIChild with it control to fix in any monitor size.
|
|
|
|
|
I assume that you are talking about the forms.
If so then just set the windowstate property in each form to maximized.
Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch
|
|
|
|
|
I'm looking for a vbscript to disable local (XP & Win 7) accounts that haven't been accessed in the last 60 days.
|
|
|
|
|
There's an example here[^]; it's asp, so you'd have to translate it to vbscript.
Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
|
|
|
|
|
Thanks a lot Eddy. I'm not much of a translator, so I kept looking and found this it works great.
***************CODE*******************
Option Explicit
Dim objNetwork, strComputer, objComputer, objUser, dtmLast
' Bind to the local computer.
Set objNetwork = CreateObject("Wscript.Network")
strComputer = objNetwork.ComputerName
Set objComputer = GetObject("WinNT://" & strComputer & ",computer")
' Enumerate all users.
objComputer.Filter = Array("user")
For Each objUser In objComputer
' Trap error if user never logged in.
On Error Resume Next
dtmLast = objUser.lastLogin
If (Err.Number <> 0) Then
dtmLast = #1/1/1970#
End If
On Error GoTo 0
' Check if last logon was more than 30 days in the past.
If (DateDiff("d", dtmLast, Now()) > 60) Then
' Disable the user.
objUser.AccountDisabled = True
objUser.SetInfo
End If
Next
***************CODE*******************
|
|
|
|
|
Please help me friends for enabling my menu using in vb6 as string saved in vb6.0
AMdi."MnuMastCate".Enabled=False
Please give me a solution for this code
|
|
|
|
|
palur1981 wrote: Please give me a solution for this code
The only thing still supporting VB6 is Google.
Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
|
|
|
|
|
Anyone have a program where I can enter a username and have it provide info from Active Directory or Outlook GAL?
I want to be able to input a username. Then have it provide Example:
Name
Phone
Location
Department
Manager
Any Help?
|
|
|
|
|
The only program you get is the one you're going to write.
We're not in the business of writing code "on demand".
|
|
|
|
|
Start by having a read of this CP article
Accessing LDAP User list using VB.NET[^]
Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch
|
|
|
|
|
Hai. I would like to seek for help about mathematical expression in vb.net. how to make a system like this url Basic mathematical expression evaluator[^] but for each operand, user need to define separately. for example if the mathematical expression given like this:
(a+b)/f+c(r-i)
a=?
b=?
c=?
r=?
i=?
|
|
|
|
|
what you have tried so far? it's not that difficult as you think.
|
|
|
|
|
I'll give you another hint; you could replace[^] an old value with a new value.
Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
|
|
|
|
|
Hi, how can i make these two functions in my form (Zoom in or Zoom Out)?
i wish to increase or decrease size in my form
|
|
|
|
|
You'll have to be a bit more specific than that. What exactly do you want to "Zoom In/Zoom Out"?? A picture being displayed? The contents of the entire form, including all of it's controls?? What?
|
|
|
|
|
without knowing what you are trying to zoom in or zoom out from I would start having a look at the ScaleF methods
System.Windows.Forms.Control.Scale[^]
Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
