pls explain
=========================
Function chgRepID(svrname As String, dbname As String) As Boolean
Dim svrNotesName As New NotesName(svrname)
Dim ReplicaID As TIMEDATE
Dim ReplicaInfo As DBREPLICAINFO
Dim RC As Integer
Dim hDB As Long
Dim PortName As String * 64
- is the developer understodd that size of the variable should be like string * 64, so written that.
bt how can the person take exact value like 64, it can be 65 or 63.
Dim ServerName As String * 256
Dim FileName As String * 256
Dim retPathName As String * 256
On Error Goto errHandler
RC = OSPathNetConstruct (0, svrname, dbname, retPathName)
RC = NSFDBOpen(retPathName, hDb)
If hDb = 0 Then
chgRepID = False
Exit Function
End If
- in the above two declaration what the person wan to mean?
as … RC = OSPathNetConstruct (0, svrname, dbname, retPathName)
again
RC = NSFDBOpen(retPathName, hDb) …explain pls
RC = W32_NSFDBReplicaInfoGet(hDb, ReplicaInfo)
Call W32_OSCurrentTimeDate(ReplicaID)
ReplicaInfo.ID = ReplicaID
RC = W32_NSFDBReplicaInfoSet(hDb, ReplicaInfo)
RC = NSFDBClose(hDb)
chgRepID = True
Exit Function
errHandler:
chgRepID = False
Exit Function
End Function