Ciclo

martedì 10 luglio 2007 - 10.29

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

programmare Profilo | Newbie

14 messaggi | Data Invio: mar 10 lug 2007 - 10:29

salve ho un grosso problema con access:
ho scritto questo codice su apertura di una meshcera per fare in modo che ad un id ben preciso deve cambiare colore alla casella di testo, ma cambia colore a tutti gli id
Dim con As Object
Dim rs As Object
Dim stSql As String
Dim intOption As Integer
Dim fld As Field

Set con = Application.CurrentProject.Connection
stSql = "SELECT * FROM edit1"

Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1

While (Not (rs.EOF))
If rs.Fields("IDdirittocivile").Value = "2" Then
Me.MATERIA.BackColor = 8388863

MsgBox (ok)
End If

rs.MoveNext
Wend

rs.Close
Set rs = Nothing
Set con = Nothing

End Sub

Pongo Profilo | Senior Member

274 messaggi | Data Invio: mar 10 lug 2007 - 16:08

Che cos'è ME??

Sei sicuro che il comando non prenda tutto il tuo controllo e non solo la righa che ha il 2 come 'ID'??

Mi sa che l'errore è quello!!

programmare Profilo | Newbie

14 messaggi | Data Invio: mer 11 lug 2007 - 14:30

grazie sembra che questo l'ho risolto, ho un nuovo piccolo probelma, ho 100 rercod, devo fare una funzione che mi divide questi 100 record in gruppi da 4 , ed ogni volta che lancio questa funzione mi deve fare uscire in modo random, gruppi da 4 numeri ogni volta diversi, siccoem sono alle prime esperienze mi potresti dare una dritta come fare?
ti ringrazio in anticipo.

Torna su

Stanze Forum

Elenco Threads

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 !