Public Class Form1 Inherits System.Windows.Forms.Form
Dim myConnection As OleDbConnection 定义connector
Dim myCommand As OleDbCommand 定义command
Dim dr As New OleDbDataReader() 定义 装资料的 箱
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
myConnection = New OleDbConnection("Provider=MSDAORA.1;UserID=scott;password=tiger; database=ora")
MSDORA 是oracle 的
myConnection.Open() 接到database
myCommand = New OleDbCommand("Select * from emp", myConnection) 定义SQL的
dr = myCommand.ExecuteReader() 把资料拉出来 装在 dr 的箱
While dr.Read() 当dr有资料就
End Sub
End Class作者: goodhermit95 时间: 2008-10-22 05:01 PM
我考试
考完式还有很多东西作
没有空
JUNIOR MIDDLE ONE 18 CD AUTORUN MENU
- PROCESS.START -> MOVIE
- PROCESS.START - PICTURE
- MOVIE BROWSER
- PHOTO BROWSER
- COPY FILE TO HARDDISK
- UPDATE SYSTEM
- ABOUT
YOUTUBE VIDEO DOWNLOADER <科级比赛拿去
COMPERTITION - INTERNET NOVEL <我要写两篇