03. januar 2001 - 17:05Der er
18 kommentarer og 1 løsning
OLEDB ADO connection til SQL Server 7 fra Access 97
Ok, så er der brug for alle hjerneceller !!!
Jeg har en frontend, der er lavet i access97. Jeg har en database der ligger på en SQL Server 7.0
Jeg ønsker at lave en hurtig forbindelse og bruger derfor denne kode :
Dim rec As ADODB.Recordset Set rec = New ADODB.Recordset rec.CursorType = adOpenKeyset rec.Open \"Select kundeid From Tab_kunde\", \"File Name=C:\\OLEDB.UDL\"
Dette virker vist godt nok, for jeg får ingen fejlmeddelser............MEN hvordan fanden får jeg over ført de værdier der er i tabellen til to tekstbokse på en form ???????????????????????
skriv start på siden <% While Not rec.EOF \'kører alle rækkerne i gennem %> Skriv html starten textbob i html <% Response.Write rec.Fields(\"kundeid\") \'skriver hvad der står i feltet %> skriv html slutningen af textbox <% rec.MoveNext \'flytter til næste række Wend %> skriv resten af side
Ok, nu er der lige en ting der skal slås fast : Jeg skal bruge koden i VBA.........Jeg sidder ikke og laver noget Html og har på intet tidspunkt antydet det !!!
Gentager fra toppen : Jeg har en frontend der er lavet i Access97 !!!!!!
While Not rec.EOF \'kører alle rækkerne i gennem combo1.additem rs(\"field1\") udfylder en combobox med rækkerne i kolonne filed2 rec.MoveNext \'flytter til næste række Wend
Kom lige i tanke om noget : Hvis der er en der har en voldsom hurtig kode til at lave forbindelsen direkte mellem Access-koden og SQL Serveren (Nu 2000) er jeg meget intersseret. Vil gerne nøjes med en enkelt fil der skal fordeles til mine brugere.
hvordan skal KundeID skrives i de 2 teksbokse? Bare efter hinanden? Eller skal tekstboksene linkes til tabellen, så du kan bladre gennem tabellen via formen?
Skriv evt direkte til min mailadresse (tj@makeiteasy.dk)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
