【新手】VB如何连接SQL Sever2000.
准备添加段代码到模块里。
但是不知道怎么写。
这是老师给点例子。
高手帮看看。
VB code:
Public CONN As ADODB.Connection
Public RS As ADODB.Recordset
Function ConnOpen()
Dim ASTR As String
Set CONN = New ADODB.Connection
ASTR = "f:\Library_Data.MDF"
CONN.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;DataSource=" & ASTR & ";Persist Security Info = False"
CONN.Open
Set RS = New ADODB.Recordset
With Rs Do
ActiveConnection = CONN
CurosorType = adOpenDynamic
LockType = adLockOptimistic
End With
End Function
试一下,看有什么问题
VB code:
dim conn as new connection
With conn
If .State = adStateOpen Then .Close
.ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=SA;pwd=SA的密码;database=数据库名"
.CommandTimeout = 0
.Open
End With
www.conneectionstring.com
查sql server
VB code:
Private Sub Form_Load()
Call my.ConnOpen
End Sub
准备这样。
但是一运行就出错。
你这个连接字符串貌似不可以
应该类似
&
相关问答:
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......
我一个项目,有个插入操作,具体是这样的:
我有进货信息表。在出货时选择相应的进货信息,输入数量,选择部门后,点保存按钮,由于网络延时,点一下没有反映,于是用户就又点一下,导致一次插入了两条记录:
例:
......
我要得到一个字符串如:
sdfk|||sgts
sdfsfd|||rgreg
wrfw|||sefw
就是要得到|||后面的字符串,有什么函数吗?怎么用呢?谢谢!
SQL code:
select
right(col,len(col)-charindex('|||',col)-2)
f ......
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
--drop table #T1
--drop table #T2
create Table #T1(ID int,
QueryID nvarchar(20),
ResultID1 nvarchar(20),
ResultID2 nvarchar(20))
create Table #T2(SortNo int,
QueryID nvarchar(20),
ResultID1 nv ......