Invoking a Control by its Name string? - Visual Basic Discussion Boards

Re: sql problem

Nic Rowan6-Oct-05 2:13

Nic Rowan

6-Oct-05 2:13

It would have probably been better to post this in the SQL forum [^] Smile | :)

This is a bit of a hack but it should work:

SELECT RIGHT(CONVERT(VARCHAR,GETDATE(),100),7)

The man who smiles when things go wrong has thought of someone he can blame it on.

If you tell a man there are 300 billion stars in the universe, he'll believe you. But if you tell him a bench has just been painted, he'll have to touch it to be sure.

-- modified at 8:17 Thursday 6th October, 2005

Re: sql problem

abhinish7-Oct-05 19:02

abhinish

7-Oct-05 19:02

i think u right ...
by the way thanks a lot it is working ..
bi

abhinav

Validation for Dropdown list

BORN...again!5-Oct-05 19:20

BORN...again!

5-Oct-05 19:20

I am using a 'Required Field Validator' for my Dropdown list but it doesn't work , if I do not select any thing from the list it still saves the form and I guess that is necause it assmues the first entry in the list as selected always no matter what the first item is.

I also tried using 'Range Validator' to see that the item selected from the dropdown is between 2 & 10... item no 1 in the dropdown is 'Please Select' , but that is not working as well..

does anyone have an idea as to which validator will work to see that the user HAS selected an entry from the dropdown else the form will not save.

Thank you for your precious time invested in answering this query.

Aartee.
...HE is watching Us All!

Re: Validation for Dropdown list

Gavin Jeffrey6-Oct-05 1:41

Gavin Jeffrey

6-Oct-05 1:41

use the custom validator -

private void CustomValidator1_ServerValidate(object source, System.Web.UI.WebControls.ServerValidateEventArgs args)
{
if ( !dropdown.SelectedIndex == 0 )
args.IsValid = false;
}

Could some body know about ISAM

Swiss Mantoro5-Oct-05 19:02

Swiss Mantoro

5-Oct-05 19:02

Hi guys

is there some body could help me with ISAM problem ? I have one form which is contains a crystal report viewer but when I run this form I always get error message " Could not find Installable ISAM ", Here is I show you my listing code :

Dim dasuminv As OleDb.OleDbDataAdapter
Dim con As New OleDb.OleDbConnection(Koneksi("E:\Data\BTH.mdb"))
Dim dtsuminv As New DataTable()

Function Koneksi(ByVal strdatabase As String) As String
Dim Kalimat As String

Kalimat = "Provider=Microsoft.Jet.OLEDB.4.0;"
Kalimat &= "Datasource = " & strdatabase & ""
Return Kalimat
End Function

Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
range1.CustomFormat = "dd-MMMM-yyyy"
range2.CustomFormat = "dd-MMMM-yyyy"
Try

dasuminv = New OleDb.OleDbDataAdapter("select* from suminv", con)
dasuminv.Fill(dtsuminv)
Catch ex As Exception
MsgBox(ex.Message)

End Try

End Sub

I don't know how to fixed this matter, could you please to help me ASAP
thank you for your assist

Best regards

I C E

RE:VB.NET

Larry J Williams5-Oct-05 13:36

Larry J Williams

5-Oct-05 13:36

I am very new to programming and I'm trying to learn VB.NET 2003. Every time I try to create a new project I get an error message that says "Automation server can't create object". What do I need to do to correct this?

Thank You,
Larry J. Williams

Re: RE:VB.NET

enjoycrack5-Oct-05 14:03

enjoycrack

5-Oct-05 14:03

hi there,

this link might help u
Solution

<< >>

-- modified at 20:03 Wednesday 5th October, 2005

Invoking a Control by its Name string?

watagal5-Oct-05 9:03

watagal

5-Oct-05 9:03

Greetings!

I want to switch controls (panels) visibility by using their respective names (in variables). How can I get there from here:

Public prefPanel As Panel = New Panel()
Private Sub uxcPreferencesForm_Load(....) Handles MyBase.Load
    prefPanel = Me.uxcGeneralPnl    ' Startup Panel
    prefPanel.Visible = True
End Sub
Private Sub uxCatagoryTree_AfterSelect(....) Handles uxCatagoryTree.AfterSelect
    prefPanel.Visible = False       ' Hide Current Panel

    Dim path As String = uxCatagoryTree.SelectedNode.FullPath
    Dim arrPath As Array = path.Split("\")

    Dim panl As String = "uxc"      ' Formulate new Panel's name
    For i As Integer = 0 To (arrPath.Length - 2)
       panl += arrPath(i).ToString.Substring(0, 3)
    Next i
    panl += arrPath(arrPath.Length - 1).ToString + "Pnl"

    prefPanel.Name = panl       ' HERE IS WHERE I GET LOST
    prefPanel.Visible = True        ' Show New Current Panel
    uxHeadingLbl.Text = panl  'path
End Sub

The panels are all created (and designed) at compile time - they are invisible. Is there a way to handle this switching?

Thanks,
Karen

Nooobie to OOP and VB.Net 2005

where is the syntax error!!!!!

acheo5-Oct-05 8:11

acheo

5-Oct-05 8:11

VB code:

strConditionDates = "((Mission_Date >= #" & txtDate1 & "#) AND (Mission_Date <= #" & txtDate2 & "#) AND (Mission_Code = '" & Me.ListBoxMission_Code & "'))"

Set rstMissions = CurrentDb.OpenRecordset("select distinct FK_Mission_PK from [sql_équipage des missions] where ((FK_MISSION_PK is not null) AND" & strConditionDates)

With the debugger strConditionDates takes the following value:

"((Mission_Date >= #2005-01-01#) AND (Mission_Date <= #2005-10-05#) AND (Mission_Code = 'AI 165 C'))"

tx

Acheo

Re: where is the syntax error!!!!!

Richard_Wolf5-Oct-05 9:33

Richard_Wolf

5-Oct-05 9:33

I don't know much SQL but if your code is an exact copy...

"...SION_PK is not null) AND" & strConditionDates)"

put a space between the AND and the quote, or add a space to the front of strConditionDates.

Re: where is the syntax error!!!!!

KaptinKrunch7-Oct-05 6:19

KaptinKrunch

7-Oct-05 6:19

I can see that the sql statement is malformed.

Currently reads:
"select distinct FK_Mission_PK from [sql_équipage des missions] where ((FK_MISSION_PK is not null) AND((Mission_Date >= #" & txtDate1 & "#) AND (Mission_Date <= #" & txtDate2 & "#) AND (Mission_Code = '" & Me.ListBoxMission_Code & "'))"

Should read:
"select distinct FK_Mission_PK from [sql_équipage des missions] where (FK_MISSION_PK is not null) AND (Mission_Date >= #" & txtDate1 & "#) AND (Mission_Date <= #" & txtDate2 & "#) AND (Mission_Code = '" & Me.ListBoxMission_Code & "')"

please help printing & CD Writting

ThangaDharma5-Oct-05 6:55

ThangaDharma

5-Oct-05 6:55

How to find no of pages printed this job
How to find no of copies Make in CD Writter

-- modified at 12:58 Wednesday 5th October, 2005

Retrieve Info from another form

SoonerFan5-Oct-05 6:52

SoonerFan

5-Oct-05 6:52

I have a button on a form that calls an instance of another form, but when this form is closed by the user it need to clear a textbox on original form.
I am having a problem clearing textbox?

The code I use to call instance of form is:
Private Sub btnDrift2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDrift2.Click

Dim Drift2 As frmDrift2
Drift2 = New frmDrift2
Drift2.Show()
End Sub

The code on the second form to clear textbox is:
Private Sub frmMap_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Dim Snow As frmSnow
Snow = New frmSnow
Snow.tbxMapStatus.Text = ""
End Sub

Any Help?

Re: Retrieve Info from another form

Anonymous5-Oct-05 8:40

Anonymous

5-Oct-05 8:40

Replace all the code in the sub of the second form with this:
frmSnow.tbxMapStatus.Text = ""

Re: Retrieve Info from another form

Anonymous5-Oct-05 10:59

Anonymous

5-Oct-05 10:59

I get the blue line

States:
Reference to a Non-Shared Member Requires a Object Reference.

Re: Retrieve Info from another form

maxiachun6-Oct-05 19:59

maxiachun

6-Oct-05 19:59

You can have a try using module to give name for both forms as:
public drift2 as new frmDrift2
public snow as new frmSnow

then in the those two program you donot need NEW again!

you can just directly to use drift2.show() and snow.tbxMapstatus.text ="" it works fine!

I am Entry level person

please help

Anonymous5-Oct-05 3:57

Anonymous

5-Oct-05 3:57

hi how to display the combobox items in ascending order. if combo box containing "name" feild, how to display in alphabatical order.
please help me.

Re: please help

Anonymous5-Oct-05 8:27

Anonymous

5-Oct-05 8:27

Just set the Sorted property of the combobox to TRUE.

calculated field

Anonymous5-Oct-05 3:47

Anonymous

5-Oct-05 3:47

hi i am using date-time-picker for "date of birth" field. another column called "age" has to fill automaticaly after entering date of birth column. how to do this?
please inform.

Re: calculated field

Anonymous5-Oct-05 8:36

Anonymous

5-Oct-05 8:36

Dim intAge as Integer
intAge = DateDiff("yyyy",DateofBirth,Date)

Hint: Replace DateofBirth with the value of whatever variable name you are using for the DateofBirth field.

How to design Functioncall parameters ?

immes4-Oct-05 22:40

immes

4-Oct-05 22:40

Good morning everybody,

I have a Question concerning the Types that can be used in Functioncalls. (It's about usability...)

Let's say I got this Function:

function Foo (byval chooseTime as INTERVALL )

TIMEVALUES is an enum like this:

Public Enum INTERVALL As Integer

D_EFAULT = 0
SEC_5 = 5000
SEC_10 = 10000
SEC_30 = 30000
MIN_1 = 60000
MIN_5 = 300000
MIN_10 = 600000

End Enum

When someone is calling the Function Foo he will see a dropdownlist where he can choose one of the values in the enum.
My Problem now is that I only want a dropdown with the Values (e.g. D_EFAULT,SEC_10 etc.) instead of the whole path that is presented (e.g. INTERVALL.D_EFAULT....). Is that possible in any way ?

Thank you very much

cu

immes

Regarding Application Crash

Mohamed Ishak4-Oct-05 21:19

Mohamed Ishak

4-Oct-05 21:19

Dear ,
My application is client- server application and one module is used for send file to server application for mail sending purpose.
If the user type the mail text than click send button it will save to the database,than it will convert to XML(from Dataset) ,than the file will be
zipped than it will pass accros the Dial-up Network.The server will recieve the file and Unzip it ,than the XML file convert to dataset and saved
and save to the database .this will work fine but when i want to see the mail .,I opened that mail,that time the appliaction crash and give this error
and sometime when i click the mail delete button ,the application crash. can u help me in my case.
if u need more info about scenerio,please mail me

Error Ocuured In Form : frmMail
Error Ocuured In Module : Button10_Click
Error Ocuured At Time : 10/4/2005 2:29:24 PM
Exception Occured In ITICSMS Server :
Message : Object reference not set to an instance of an object.
Source : System.Windows.Forms
StackTrace : at System.Windows.Forms.SafeNativeMethods.MessageBox(HandleRef hWnd, String text, String caption, Int32 type)
at System.Windows.Forms.MessageBox.ShowCore(IWin32Window owner, String text, String caption, MessageBoxButtons buttons, MessageBoxIcon icon, MessageBoxDefaultButton defaultButton, MessageBoxOptions options)
at System.Windows.Forms.MessageBox.Show(String text, String caption, MessageBoxButtons buttons, MessageBoxIcon icon, MessageBoxDefaultButton defaultButton)
at CSMSServer.frmMail.Button10_Click(Object sender, EventArgs e)
Explanation : System.NullReferenceException: Object reference not set to an instance of an object.
at System.Windows.Forms.SafeNativeMethods.MessageBox(HandleRef hWnd, String text, String caption, Int32 type)
at System.Windows.Forms.MessageBox.ShowCore(IWin32Window owner, String text, String caption, MessageBoxButtons buttons, MessageBoxIcon icon, MessageBoxDefaultButton defaultButton, MessageBoxOptions options)
at System.Windows.Forms.MessageBox.Show(String text, String caption, MessageBoxButtons buttons, MessageBoxIcon icon, MessageBoxDefaultButton defaultButton)
at CSMSServer.frmMail.Button10_Click(Object sender, EventArgs e)

================================================================================
Error Ocuured In Form : MdlStart
Error Ocuured In Module : Main
Error Ocuured At Time : 10/4/2005 2:29:39 PM
Exception Occured In ITICSMS Server :
Message : Object reference not set to an instance of an object.
Source : System.Windows.Forms
StackTrace : at System.Windows.Forms.UnsafeNativeMethods.PeekMessage(MSG& msg, HandleRef hwnd, Int32 msgMin, Int32 msgMax, Int32 remove)
at System.Windows.Forms.ComponentManager.System.Windows.Forms.UnsafeNativeMethods+IMsoComponentManager.FPushMessageLoop(Int32 dwComponentID, Int32 reason, Int32 pvLoopData)
at System.Windows.Forms.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
at System.Windows.Forms.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
at System.Windows.Forms.Application.Run(Form mainForm)
at CSMSServer.mdlConnect.main()
Explanation : System.NullReferenceException: Object reference not set to an instance of an object.
at System.Windows.Forms.UnsafeNativeMethods.PeekMessage(MSG& msg, HandleRef hwnd, Int32 msgMin, Int32 msgMax, Int32 remove)
at System.Windows.Forms.ComponentManager.System.Windows.Forms.UnsafeNativeMethods+IMsoComponentManager.FPushMessageLoop(Int32 dwComponentID, Int32 reason, Int32 pvLoopData)
at System.Windows.Forms.ThreadContext.RunMessageLoopIn ner(Int32 reason, ApplicationContext context)
at System.Windows.Forms.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
at System.Windows.Forms.Application.Run(Form mainForm)
at CSMSServer.mdlConnect.main()

Ishak

COMBO BOX

nor_izyani4-Oct-05 20:02

nor_izyani

4-Oct-05 20:02

Hello everybody

I'm doing a programming using VB6.0.

My question is..

How am I going to code the coding for combo box.. For smart card reader..

How the combox will detect there are a new card reader installed to the computer.

yani

Re: COMBO BOX

Dave Kreskowiak5-Oct-05 3:44

Dave Kreskowiak

5-Oct-05 3:44

The combobox doesn't do this at all. It won't detect anything because it's not designed for this.

Your application has to detect and use the SmartCard reader through whatever SDK you can find for it. Check the manufacturer's website to see if there is any developer information for it.

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

Re: COMBO BOX

AndrewVos6-Oct-05 8:49

AndrewVos

6-Oct-05 8:49

Damn what a useless comboBox, what were they thinking OMG | :OMG:

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.