Item
Set Rec = Server.CreateObject("ADODB.Record")
With Rec
.Open urlMoveFrom, Cnn, 3 ' adModeReadWrite
'.DeleteRecord '好象没有这个方法,你试试用这个
do while not .Eof
.Delete
.movenext
loop .Close
End With'''''''''''''
最好是用Connection.Execute "Delete from TableName'
Set Rec = Server.CreateObject("ADODB.Record")
With Rec
.Open urlMoveFrom, Cnn, 3 ' adModeReadWrite
'.DeleteRecord '好象没有这个方法,你试试用这个
do while not .Eof
.Delete
.movenext
loop .Close
End With'''''''''''''
最好是用Connection.Execute "Delete from TableName'
我忘了说一句,我用的是Exchange,不是SQL Server!那一句没有错!!在ASP里属性设置都没问题,但就是不能调用Delete()方法!!!!!!!!!!!
With Cnn
.Provider = "exoledb.datasource"
.Open urlMoveFrom_cnn
'.BeginTrans
End With我感觉cnn这个连接的参数是不是少了不止好象一个.provider吧这是我的感觉不知道是不是对
Exchange WSS用的就是EXOlEDB,这里也没有任何问题!
我把VB里的代码拷贝到ASP里,没有问题!
问题应该就出在不能调用Delete()方法!!!!!!!!!!!
如果没有就先测试一下,再用ASP调用
Dim ItemMag As Item.Manager
Set ItemMag = CreateObject("Item.Manager")
With ItemMag
.GroupName = "bianji"
.UserName = "lizhihong"
.Item = "lizhihong2001-12-4-11-10-32.htm"
.Delete '''''''''''''''''''''''''''执行到这一句显示错误“实时错误 需要对象”
End With
MsgBox "OK!"
End Sub可是对象浏览器里明明有Delete方法呀!
我认为是你的DLL错了,是你为有新件一个实例,也就是没有初始化。
联调一下,问题应该很容易解决的。