Problems with project

[Krusho]

Could someone look at my project and help me fix the code so that it runs again? I don't know what I changed. Reply so I could send it to you. It can't get past the first part when it runs. You'll see what I mean.

 

[johnwm]

Post the relevant section of code here

See faq222-2244 as well!


________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'People who live in windowed environments shouldn't cast pointers.'

 

[Krusho]

'Form Code
Private Sub form_load()
Dim s As String
Close #1
rtbChat.BackColor = vbBlack
rtbChat.Font.Size = 8
lvChannel.View = lvwSmallIcon
AddChat &H99CC00, "Welcome to Lost.Bot v1.0 Test Edition by Krush[LM]"
frmChat.KeyPreview = True
frmChat.Caption = ".:. Lost.Bot v1.0 [Test] (Disconnected)"
frmAbout.lblTitle.Caption = ".:. Lost.Bot v1.0 Test Edition"
Me.Show
Me.Refresh
AutoClear = True

s = Dir$(App.Path & "\quickchannels.txt&quot
If s = "" Then
lbQC.AddItem "Clan L-M"
lbQC.AddItem "Clan Overdosed"
lbQC.AddItem "Clan Dark)Side"
lbQC.AddItem "Clan {DK}"
lbQC.AddItem "Clan DarkStar"
mnuQC1.Caption = lbQC.List(0)
mnuQC2.Caption = lbQC.List(1)
mnuQC3.Caption = lbQC.List(2)
mnuQC4.Caption = lbQC.List(3)
mnuQC5.Caption = lbQC.List(4)
Exit Sub
End If

Open (App.Path & "\quickchannels.txt&quot For Input As #1
Do
Input #1, s
lbQC.AddItem s
Loop Until EOF(1)
mnuQC1.Caption = lbQC.List(0)
mnuQC2.Caption = lbQC.List(1)
mnuQC3.Caption = lbQC.List(2)
mnuQC4.Caption = lbQC.List(3)
mnuQC5.Caption = lbQC.List(4)
End Sub


says method or data member not found. you'll need to view the project as a whole.

 

[johnwm]

Which line errors?
And what is AutoClear?


________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'People who live in windowed environments shouldn't cast pointers.'

 

[Krusho]

It's a chat program. Would you like me to send you the entire project?

AutoClear is the thing that clears the chat window.

 

[johnwm]

I'll ask again - Which line errors?


________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'People who live in windowed environments shouldn't cast pointers.'

 

[CasperTFG]

Krusho,

I think you will best be able to help yourself by adding in some error trapping... Then you can simply look at the debug files to figure out what the error is.

Try the following FAQ to get started with Error Trapping.

faq222-1694

Also note... You should not get people to help you offline. THis is a public forum for a reason, so that the time experts offer here doesn't go wasted to just one person, it is meant to be saved online to help others with similar questions.


Craig, mailto:sander@cogeco.ca

In the computer industry, there are three kinds of lies:
lies, damn lies, and benchmarks.

 

[Krusho]

lvChannel.View = lvwSmallIcon

 

[CasperTFG]

and what is the error it returns?

Craig, mailto:sander@cogeco.ca

In the computer industry, there are three kinds of lies:
lies, damn lies, and benchmarks.

 

[Krusho]

says method or data member not found. you'll need to view the project as a whole.

 

[Krusho]

I know C but I'm still newbish in VB. Only reason I'm using VB is the code to patch into the network with the chat was written in vb.