Visual basic 6 and .net

[vbmaster]

hey guys & girls

oyagollonta vb gana sinhalen danaganna onenam hari VB code monava hari onenam mey thread eken ahanna (i mean vb sambanda onima deyak)
mama eva oyagollonta dennam , guru mushti nathuwa

• vb saralawa mulasita nemei , Oyagollonta vb wala thiyena prashna mama nirakaranaya karganna help karannam

• oyagollonta new software ekak hadagana oni but a gana hariyatama idea nathnam magen ahanna , Sometime mata puluwan wei help karanna

habai mama reply karanna tika welavak gani hode

So i'm watting

 

[vbmaster]

katawath onne naddo ???

 

[henderson]

thanx mate, I think vb programmers will find this thread very useful.

 

[CmatN70]

Mama Inawoooooo

I wanna make some thing lyk a bill. and hav to save each and every thing in a db and it will be abl to tak prints..........

 

[2lk]

connect VB 6.0 with MS Access Database

macho mata danaganna puluwanda VB 6 walin access database ekak conect karala, database eke data field ekak thiyena data ekak search karana widiya.

 

[MagmificentROO]

good work machan ona unoth ahannam

 

[vbmaster]

Mama Inawoooooo

I wanna make some thing lyk a bill. and hav to save each and every thing in a db and it will be abl to tak prints..........

macho mata danaganna puluwanda VB 6 walin access database ekak conect karala, database eke data field ekak thiyena data ekak search karana widiya.

Poddak idahan mama dennam puluwan ikmanatama

 

[miuru87]

hey do you know VB.net ?
if so do you know SQL also ?
and if so please can you tell how to creat a Data base using SQL in Visual studio 2005 ?

 

[vbmaster]

access 97(2000 or xp ) use karanawanam godak easy


so first creat a database from 2000 or xp and convert it to 97 format

ita passe crama 2 k thiyenawa

1 . using wizard

right click on the project expolrer > add > form > vb data form wizard

2. using code


first go to da project menu > references > and tick "micrsoft activex data objects 2.0 library"

Dim WithEvents RSrecordset As Recordset
Dim maindb As Connection

connect to da database

Private Sub Form_Load()

Set maindb = New Connection
maindb.CursorLocation = adUseClient

'using password

maindb.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=database path ;Jet OLEDB: Database Password=pasword;"


'not using password

maindb.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=database path ;Jet OLEDB: "

Set RSrecordset = New Recordset
RSrecordset.Open "type ur records name select from table name ;", maindb, adOpenDynamic, adLockBatchOptimistic, 1

' record name eke space thiyenawanam like User name eka [user name] vidihata danna oni

'type ur records name eg username , userpassword ,email
' [user name] , [user pass] , email

' : D mada space eka iwath karanna (smiles enawa )


End Sub

Show data

text1.text = RSrecordset("record name") & ""

updata data

RSrecordset.Update "record name", text1.text


or

RSrecordset("record name 1" ) = text1.text
RSrecordset("record name 2" ) = text2.text
RSrecordset("record name 3" ) = text3.text
RSrecordset.Update

add new data

RSrecordset.AddNew
RSrecordset.MoveLast ' go to the new one
'and update code here

text1.text = ""
...
..

delete data

RSrecordset.delete

search

RSrecordset.Open "select * from table name where [record name]='" & searching thing & "' ", maindb, adOpenDynamic, adLockBatchOptimistic
'select * = select all the records
show data code here

move to the next , Previous , last or first

If Not RSrecordset.BOF Then RSrecordset.MovePrevious


If Not RSrecordset.EOF Then RSrecordset.MovePrevious


RSrecordset.Movelast
RSrecordset.movefirst

mey athyavashsha code vitharai mey code valin project eka hada ganna puluwan

 

[vbmaster]

thanx mate, I think vb programmers will find this thread very useful.

thanx

 

[vbmaster]

office 2007 use karanawanam

dim db As ADODB.Connection
dim rc As ADODB.Recordset

Set db = New ADODB.Connection
db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database1.mdb;Persist Security Info=False"

Set rc = New ADODB.Recordset
rc.Open "select * from table1", db

mathaka athuwa project menu > references > microsoft activeX data objects 2.8 library
tick karanna

 

[vbmaster]

data print karanawanam easy ma vidiha thamai "Rich text box" use karana eka


project menu > components > microsoft Rich text box and microsoft common dialog contral 6.0 tick karanna

form ekata rich text box ekai common dialog add karanna

rich text box eke name eka rtftext
common dialog eke name eka dlgCommonDialog

rtftext eka print karana code tika

With dlgCommonDialog
.DialogTitle = "Print"
.CancelError = True
.Flags = cdlPDReturnDC + cdlPDNoPageNums
If ActiveForm.rtfText.SelLength = 0 Then
.Flags = .Flags + cdlPDAllPages
Else
.Flags = .Flags + cdlPDSelection
End If
.ShowPrinter
If Err <> MSComDlg.cdlCancel Then
rtfText.SelPrint .hDC
End If
End With

rtfText.SelAlignment
rtfText.SelBold
rtfText.SelBullet
rtfText.SelColor
rtfText.SelFontName
rtfText.SelFontSize
rtfText.SelItalic

rtftext.selStart = 6 ' selection eka start karana thana
rtfText.SelLength = 3 ' selection eke diga kochcharak letters select karanawada kiyana eka


rtfText.Seltext = chr(13) ' next line
rtfText.Seltext = chr(9) ' tab space
rtftext.selstart = len(rtftext.text) ' go to da last letter



here eg

rtfText.SelAlignment = rtfCenter
rtfText.SelBold = True
rtfText.Text = "Tital"

rtfText.SelStart = Len(rtfText.Text)
rtfText.SelAlignment = rtfLeft
rtfText.SelBold = False

rtfText.SelText = "line1" & Chr(9) & "1" & Chr(13) & "line2" & Chr(13) & "line3"

Tital

​

line1 1
line2
line3​

 

[dilrasan]

Ane manda...mannan PS wath hariyata danne naa...VB walin monada Karanna Puluwan...???

 

[TDM]

ela wedak machan.....matath podi hlp ekak one,.,

1)machan, machine eke thiena text file ekak(i mean .txt extention file) ethule thiyena wrds read karaganda i vb walin mokak hari .txt extention ekata save karandai.. karana heti kiyala denda puluwanda...,.,.

2) machan mokak hari extention ekak vb ethuledima define karna vidihak kiyanna puluwanda..(without manually configering a new extention )
for an example can you tell me the way to creat a extention like *.tdm ..and also machan a wage extention ekakin file ekak (text) save karana hetith ehema save karapu ekak read karana hetith poddak kiyanawada...


(IN VB 6)
thanX mate....i'm waiting 4 an answr..k

 

[TDM]

Ane manda...mannan PS wath hariyata danne naa...VB walin monada Karanna Puluwan...???

Another very gud question....lolzzz jok

 

[TDM]

ko kagenwath pilithurak nedda....

 

[thusi02]

hw cn i link sql to vb d base........cn u explain

 

[2lk]

Thanks macho

 

[Tharindu DR]

Ela kiri MaX thread1 machan....
Mata nam uben help ona wei....
Mama ona wonama illananam
Keep Up the good work.. machan

 

[gpindika]

Machan Mata VB 6 Soft Wear 1k Link 1k Diyanko