Re: cannot grab data from ms access database into list view - Visual Basic Discussion Boards

Re: Flashing Minimized Form

ADY0075-May-06 7:47

ADY007

5-May-06 7:47

Thank you very much!!! I love you Big Grin | :-D

Adrian De Battista: .Net Programmer, Java Programmer and Web Designer.

want a function

pptadam5-May-06 0:13

pptadam

5-May-06 0:13

in vb.6 we have Left(string, integer) and right(string, integer) functions
but vb.net don't have what can i do?

Re: want a function

Chatura Dilan5-May-06 0:23

Chatura Dilan

5-May-06 0:23

You have to use

Microsoft.VisualBasic.Left(string, integer)<br />
Microsoft.VisualBasic.Right(string, integer)

This is because
Left means WidowForm.Left
Right means WidowForm.Right
Smile | :)

Regards,

Chatura Dilan

Re: want a function

J4amieC5-May-06 0:59

J4amieC

5-May-06 0:59

Left can be achieved with myString.Substring(0,len)
Right you can do with myString.Substring(myString.Length - len,len)

Current blacklist
svmilky - Extremely rude | FeRtoll - Rude personal emails | ironstrike1 - Rude & Obnoxious behaviour

Re: want a function

Rizwan Bashir5-May-06 1:11

Rizwan Bashir

5-May-06 1:11

strings.Left(variable,len)
strings.right(...)

Rizwan Bashir

cannot grab data from ms access database into list view

penin4-May-06 23:46

penin

4-May-06 23:46

Hi..below is my code. when i run the code, i got error

" run-time error '3075': syntax error(missing operator) in query expression 'Detail.Room)=Console Room'.

and when i debug, it highlighted at Set rs = DBMain.OpenRecordset(sql1)

i'm using list view component, and will get the data after user choose the room name from combo box.

Hope fully anyone could help me here.... i need it urgently.. Thank you very much..........

Sub Form_Load()

lstVwDetail.ListItems.Clear

Set DBMain = DBEngine.OpenDatabase(App.Path & "\dbDetail.mdb")
sql1 = "SELECT * FROM Detail WHERE (Detail.Room)=" & frmLayout.cbLayout.Text & ""
Set rs = DBMain.OpenRecordset(sql1)

If rs.RecordCount < 1 Then

msg= MsgBox("No Record Found ", vbYesNo, "Not Found")

If msg= vbYes Then
Form1.Show

Else
Exit Sub
End If

Else
rs.MoveFirst

With lstVwDetail.ColumnHeaders
.Clear
.Add , , "Room", 1000
.Add , , "Hostname", 1000
.Add , , "Environment ", 6000

End With

Set ListItemAdd = lstVwDetail.ListItems.Add(, , lstVwDetail.ListItems.Count + 1)
ListItemAdd.SubItems(0) = rs(0)
ListItemAdd.SubItems(1) = rs!Room
ListItemAdd.SubItems(2) = rs!HostName
ListItemAdd.SubItems(3) = rs!Environment

End If

End Sub

Re: cannot grab data from ms access database into list view

Quecumber2565-May-06 2:33

Quecumber256

5-May-06 2:33

I think your problem is in your SQL statement for returning the recordset.

Try this:
sql1 = "SELECT * FROM DEtail WHERE (Detail.Room)= '" & frmLayout.cboLayout.Text & "';"

When Text parameters must be enclosed in single quotes.

Quecumber256

Re: cannot grab data from ms access database into list view

penin7-May-06 14:57

penin

7-May-06 14:57

Hi Quecumber256, thank you so much for your help. I already tried and it worked but, sadly i have problem with the statement :

Set ListItemAdd = lstVwDetail.ListItems.Add(, , lstVwDetail.ListItems.Count + 1)

'ListItemAdd.SubItems(0) = rs(0)
ListItemAdd.SubItems(1) = rs!Room
ListItemAdd.SubItems(2) = rs!HostName
'ListItemAdd.SubItems(3) = rs!Environment

when i put the quote for bold statement above, no error but the output is not correct. The output should be in table. Just like in Ms Access. Do u have suggestion on this. Actually i already try to use Data Grid with statement :

Sub Form_Load()

Set DBMain = DBEngine.OpenDatabase(App.Path & "\dbDetail.mdb")
sql1 = "SELECT * FROM DEtail WHERE (Detail.Room)= '" & frmLayout.cbLayout.Text & "';"
Set rs = DBMain.OpenRecordset(sql1)

Set DataGrid1.DataSource = rs

End Sub

.....but i got error Type mismatch for Set DataGrid1.DataSource = rs

Can anyone help me?

Thank you so much

Re: Done. Yeah! no errors!

penin7-May-06 16:33

penin

7-May-06 16:33

Done.

Printing problems

kassee4-May-06 23:29

kassee

4-May-06 23:29

looking some1 who can help me in printing reports in landscape(size A4) in vb6

Software estimation tool

kassee4-May-06 23:26

kassee

4-May-06 23:26

Hi has some1 ever done a uni project on the subject on vb.net, need some help urgent thanx........

portability for vb.net

kassee4-May-06 23:20

kassee

4-May-06 23:20

hi can some1 help me in getting some codes concerning portability of vb.net programs to different computers thanx Rose | [Rose]

Shai

Re: portability for vb.net

Guffa4-May-06 23:41

Guffa

4-May-06 23:41

A .NET program can be run on any computer that has a compatible framework installed. The Mono project[^] supports Linux, Mac OS X, Sun Solaris, BSD and Windows.

---
b { font-weight: normal; }

I want to get the screen resolution

Ishalini4-May-06 21:41

Ishalini

4-May-06 21:41

I have a problem how to get the current screen resolution

pls help me immmidiately

Re: I want to get the screen resolution

Chatura Dilan4-May-06 22:41

Chatura Dilan

4-May-06 22:41

Hi,

You can simply get it like this

Dim Resolution As String<br />
Resolution = My.Computer.Screen.WorkingArea.ToString()

Dim x As Integer<br />
Dim y As Integer<br />
x = My.Computer.Screen.WorkingArea.Width<br />
y = My.Computer.Screen.WorkingArea.Height

but note that This property is new in the .NET Framework version 2.0.

Regards,

Chatura Dilan

Re: I want to get the screen resolution

sathish s4-May-06 23:11

sathish s

4-May-06 23:11

vb.net - winforms
MessageBox.Show(Screen.PrimaryScreen.Bounds.Size.ToString())
vb
wid = Screen.Width \ Screen.TwipsPerPixelX
hgt = Screen.Height \ Screen.TwipsPerPixelY

Re: I want to get the screen resolution

Chatura Dilan4-May-06 23:40

Chatura Dilan

4-May-06 23:40

Sathish, I found another way by your code
I think this support both frameworks 1.1 & 2

wid = Screen.PrimaryScreen.WorkingArea.Width<br />
hgt = Screen.PrimaryScreen.WorkingArea.Height

Regards,

Chatura Dilan

Re: I want to get the screen resolution

ADY0075-May-06 0:58

ADY007

5-May-06 0:58

Thanks alot man!!

Adrian De Battista: .Net Programmer, Java Programmer and Web Designer.

Re: I want to get the screen resolution

sathish s5-May-06 1:05

sathish s

5-May-06 1:05

Yes, it works

How do I convert a PrintDocument to a Bitmap?

furjaw4-May-06 19:49

furjaw

4-May-06 19:49

Visual basic 2005 Express Edition:

I have a PrintDocument:

Private WithEvents mDoc As New PrintDocument()

I would like to convert it to a Bitmap, so that I can write it out to disk as a JPEG.

How do I convert a PrintDocument to a Bitmap?

Re: How do I convert a PrintDocument to a Bitmap?

Duncan Edwards Jones4-May-06 20:36

Duncan Edwards Jones

4-May-06 20:36

At the end of each "PrintPage()" event you could save the graphics object passes in as a bitmap.
Bear in mind that the bitmap will be paper size (i.e. much bigger than a screen)

Alternatively allow it to print to pdf (using a pdf driver) or take the EMF spool file and preview that with the article/code I submitted to this site last year.

'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd

Word documents’s TextChanged event

Chatura Dilan4-May-06 19:40

Chatura Dilan

4-May-06 19:40

I can open word document like this

Dim WordApp As New Word.Application<br />
WordApp.Documents.Add()<br />
WordApp.Visible = True

Does anyone know to get or create word documents’s TextChanged event.

Thank you Smile | :)

Regards,

Chatura Dilan

Re: Word documents’s TextChanged event

Rizwan Bashir5-May-06 1:20

Rizwan Bashir

5-May-06 1:20

I am not sure. but I think there is not direct event available.
the only option is to get the file write date&Time (and will occur only when the file is saved) for this two ways

1 is FileSystemWatcher.. check that

2. is to get the lastwrite time .. put this in timer
'
BeforeTime = System.IO.File.GetLastWriteTime(FileName with fullpath)
msgbox (beforeTime)

Rizwan Bashir

Re: Word documents’s TextChanged event

Chatura Dilan5-May-06 2:12

Chatura Dilan

5-May-06 2:12

Thanks Rizwan, I'll try

Regards,

Chatura Dilan

Image Editing Canvas

A M SOMAN4-May-06 19:13

A M SOMAN

4-May-06 19:13

Hi,

Is there any way in .NET language to create a user control which I can use as a Image Editing Canvas? I want a page like canvas on which I can add Text, image, rotate it, resize it and then crop, etc. And finally save the contents of the canvas as an image. Could you please suggest me the approach or any source code?

Thanks
Regards

Anil

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