Posts by debasisdas

please find the connectionstring at

http://www.connectionstrings.com/?carrier=oracle

you need to pass the sql query dynamically at run time as per user input.

first you need to expert data to a file on disc and then attach the same file.

yes , you can go with the first option. If you are finding the tab strip a bit difficult to handle try to use SS TAB instead.

i also can't find anything like that on sql developer 1.2.1

what you want to do with the tables ?

instead of hard coding the recordset object open and close that dynamically through a sub procedure.

If you are familar with oracle procedures then you just need to take care of the syntax and just implement the logic in PLSQL.

using the cache increases the performance but that can create problem in some circumstances also.

where do u plan to store the username and password ?

There are other better GUI tools like TOAD and PLSQL DEVELOPER but you need to purchase those.

You can use the inbuild tool SQL*PLUS. if you want GUI then can download and use SQL DEVELOPER for free from oracle site.

you can remove the titlebar itself just by changing the property.

for select statments (opening recordset)

rs.open "your sql statment here"

for any DML

conn.BeginTrans
conn.Execute "Your sql statment here"
Conn.CommitTrans

There is no difference in using access or oracle or mysql queries in VB. The process is all the same.

Kindly post your code . What are you doing exactly and what are the problems that you are facing.

Add Exit Sub before the error handler.

Modules are a way to declare objects at one palce and access them globally.

It is always better to go for .Net. It has a lot of advantages over age old VB 6.0. But if you still want to use VB 6.0 ,you can go for the same.

1. remove the begin end part
2.use INPUT BOX instead of PUT
3.accept the value from inputbox instead of GET.

rest almost remains

Please do not start a thread for such kind of things.

What is the data type you are using in Access . Try using decimal .

You need to parse sysdate+1+2/24+20/(24*60) to proper format before processing in database.

What are you trying to do using tab key ?

Try setting the KeyPreview property of the form to TRUE.

Try using looping through all the controls on the form that have font property.

Simply try using SUM(column_name) using SQL query.

What name ?
Name of the file ?

or something randomly.

ASCENDING is default for DESCENDING you need to specify DESC after the field name.

Have you tried refreshing the recordset ?

Are you commiting after every new insert / update ?

elow..debasisdas...
by the way the code that you given it not working....
their no error but only listview without any data...
my datagrid contain some..but my listview dont have any one...

That code works fine for me.
Try to run the code in debug mode and check .

Actually that code was to populate the list view from a tree view selection.

Try using on button click event

Try use this sample code

Private Sub tv1_NodeClick(ByVal Node As MSComctlLib.Node)
LV1.ListItems.Clear
rs.Open "select * from EMP", con, adOpenDynamic, adLockOptimistic

Dim li1 As ListItem
Set li1 = LV1.ListItems.Add()
If Not rs.EOF Then

If IsNull(rs(0)) Then
li1.Text = ""
Else
li1.Text = rs(0)
End If

If IsNull(rs(1)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(1)
End If

If IsNull(rs(2)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(2)
End If

If IsNull(rs(3)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(3)
End If
If IsNull(rs(4)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(4)
End If
If IsNull(rs(5)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(5)
End If
If IsNull(rs(6)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(6)
End If
If IsNull(rs(7)) Then
LV1.ListItems(1).ListSubItems.Add , , ""
Else
LV1.ListItems(1).ListSubItems.Add , , rs(7)
End If

End If
rs.Close
End Sub

How can you develop a project only in sql server 2000 without using any front end tool.

What are you looking for then ?

Are you able to connect to the database from windows PC ?

Please findout the details here

You can refer some good books for the purpose or can find a lot by inesting some quality time in web-seaching.

You need to capture that before deleting the items from the list view.

You can use normal combobox .Try like this

Dim SQLName As String
CboName.Clear
SQLName = "SELECT NAME FROM ENGINEER"
Rs.Open SQLName, Con, adOpenDynamic, adLockOptimistic

Set CboName.DataSource = Rs
For i = 0 To Rs.RecordCount - 1
CboName.AddItem Rs(0)
Rs.MoveNext
Next i
Rs.Close

Please specify what is the error message ?

Which line is throwing the error ?

To connect TOAD to oracle you simply need to pass the username ,password and the database name. IF connecting to any other server ,you need to midify the entries in the TNSNAMES.ORA file.

First of all Create is a DDL.
So commit is not required for that.
Check to ensure that you created the table in that schema.

what do you mean by self running ?

If you are trying the program run automatically then create a windows service using .net

You need to use the CoolBar control for all that.

when u click on the listbox item select the link address using the listindex property of the listbox and pass that to browser control.

Are you running application on a new version of windows ?

You can start with anything simple. But you should have functional knowledge of the same.
can go for as simple as library managemnet or somthing similar.

hi ..i am shweta bansal ,final year student
i have to make a dbms project using connectivity in vb.
please help me out.plzzzzzzzzzzzzzzz plzzzzzzzzzzzzzz
i will be highly obliged if u will provide me complete code along with explanation
bye

Dear shweta
My company pays me for each line of code i write. How do you expect someone writing all the code for you that to in a free forum like this. You need to develop your own project by writng your own code.

tryb to use this sample code for reference.

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >= 97 And KeyAscii <= 122 Then
KeyAscii = 0
End If
End Sub

You need to handle the keyascii in the keypress event .

You need to use microsoft commondialog control for the browse button and use the show open method and you can use multimedia control or windows media player control to play the file.