database connection with dsn.
database connection with dsn.
API Declarations
dim cn as rdoConnection
dim rs as rdoResulttest
Rate database connection with dsn.
(1(1 Vote))
'name it command one
'enter the code for command
'put three text box on form
private sub command1_click()
rs.movenext
fills 'for result
end sub
private sub form_load()
set env=rdoEnvironments(0)
env.cursorDriver=rdUseOdbc
env.UserName="imtiyaz"
en.password="haque"
set cn=env.openConnection("sih") 'dsn name
set rs=cn.openresulttest("select * from book",rdopendynamic,rdconcurRowver) 'this is for secuirity and dyanamic result with all rows
text1.text=rs(0)
text2.text=rs(1)
text3.text=rs(2)
end sub
sub fills()
text1.text=rs(0)
text2.text=rs(1)
text3.text=rs(2)
end sub
database connection with dsn. Comments
No comments yet — be the first to post one!
Post a Comment