Creazione di un record corrente...come fare??

martedì 20 febbraio 2007 - 14.58

Mimmozzo87 Profilo | Junior Member

Ragazzi....salve...

vorrei un chiarimento...

come creare un record corrente?????

se provo ad inserire un record se il database è vuoto...mi da un errore in cui mi dice che è impossibile inserire ...bisogna creare un record corrente...

questo anche qnd effettuo una ricerca e metto l'istruzione:

data1.recordset.MoveFirst

se c'è un solo record...mi da lo stesso errore...

come posso fare a creare qst record corrente????

grazie per l'aiuto...

squilibrium Profilo | Junior Member

Penso che devi fare
rs.addnew

valorizzi i campi
rs("campo1") = valore1
rs("campo2") = valore2
rs("campo3") = valore3

rs.update

Mimmozzo87 Profilo | Junior Member

io effettuo l'inserimento come dici tu...

ciò funziona se c'è almeno un record già inserito

se cancello tutti i record e provo ad effettuare l'inserimento mi esce l'errore del record corrente

batfracasso Profilo | Newbie

Prova ad usare la sintassi

RS.UpdateBatch adAffectCurrent

cosi a me funziona.... con e senza record presenti nel database.

Ciao Cesare

Mimmozzo87 Profilo | Junior Member

quindi...devo sostituire ad RS.UPDATE con questa tua istruzione...

batfracasso Profilo | Newbie

si prova cosi.
se non funziona lo stesso posta l'apertura del record.

Ciao Cesare

Mimmozzo87 Profilo | Junior Member

mi dice il seguente errore:

impossibile inserire una riga vuota. per la riga è necessario impostare un valore di colonna.

batfracasso Profilo | Newbie

'apro il recordset
RSlavoratori.Open "SELECT * FROM infodip ORDER BY matricola;", Module1.DB, adOpenKeyset, adLockOptimistic
'la tabella infodip è vuota
RSlavoratori.AddNew
'setto i miei campi
RSlavoratori!matricola="1"
RSlavoratori!cognome="TIZIO"
RSlavoratori!nome="CAIO"
'aggiorno il recordset
RSlavoratori.UpdateBatch adAffectCurrent
'chiudo
RSlavoratori.Close

io faccio cosi e mi va senza problema.
Prova a postare il tuo codice

Ciao Ce

Mimmozzo87 Profilo | Junior Member

io i database li apro al load con l'opzione connection string....

la scrittura nel database è uguale al tiuo codice solo che nn chiudo i db....

ma lo faccio aggiornare

batfracasso Profilo | Newbie

ma l'errore te lo da sull'update o su altro codice?

per aprire il database uso questa funzione:
Sub LoadDatabase(FileName As String, Optional password As String = "PASSWORD")
Dim sConn As String
Screen.MousePointer = vbHourglass
With DB
.CursorLocation = adUseClient
.Mode = adModeShareDenyNone
sConn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & FileName & ";"
'Se è stata specificata una password, la aggiunge alla stringa di connessione.
If password <> "" Then sConn = sConn & "Pwd=" & password & ";"
'Apre il database.
.Open sConn
End With
Screen.MousePointer = vbNormal
End Sub

Una volta aperto il database poi lavoro sulle tabelle.

Ciao Ce
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5