20. november 2002 - 14:24Der er
5 kommentarer og 1 løsning
For få parametre. Der var ventet 2 - fejl
Når jeg bruger nedenstående funktion får jeg ovennævnte fejl. Hvad er der galt? Jeg tror det er med dataadapteren den er gal, men er den nødvendig for at kunne returnere de forespurgte oplysninger? ===== public function FuncQueryOne(ISBN as string) as DataSet
dim objConnection as New OleDbConnection(m_DSN) objConnection.Open()
dim objCmd as New OleDbCommand() objCmd.Connection=objConnection objCmd.CommandText="[Query1]" objCmd.CommandType = CommandType.StoredProcedure
dim myDataAdapter as New OleDbDataAdapter(objCmd)
dim DataSetOne as New DataSet() myDataAdapter.Fill(DataSetOne)
Der bliver investeret massivt i AI. Teknologien er mere tilgængelig end nogensinde, og ambitionerne er høje. Alligevel oplever mange virksomheder, at resultaterne udebliver.
Hvis det f.eks. er en SELECT query, skal du skrive tabellens navn... Egentlig tror jeg det er ligemeget hvad du skriver, det er tabellens navn inden i DataSet-objektet du definerer.
Ja - det er en SELECT. Faktisk forsøger jeg blot at flytte denne SELECT til en SP: dim myConnection as New OleDbConnection(m_DSN) dim myDataAdapter as New OleDbDataAdapter("SELECT Authors.AuthorFirstName, Authors.AuthorSurName, Books.Title FROM Authors LEFT JOIN Books ON Authors.Book = Books.Title WHERE (((Books.ISBN)='" & ISBN & "'));",myConnection)
dim authorsByBook as New DataSet() myDataAdapter.Fill(authorsByBook)
Jeg har også forsøgt med SEL på en enkelt tabel, men den mangler alligevel output.
Det kan vel ikke være denne linie fra min CB-fil der skal ændres?
Denne, som er en del af min kode, fungerer. Eneste forskel i koden hér er variablen ISBN ikke er med. Er mit problem, at værdien af ISBN ikke kommer ned til Query1? Og i givet fald, hvad kan jeg gøre?
public function FuncQueryTwo() as DataSet dim objConnection as New OleDbConnection(m_DSN) objConnection.Open()
dim objCmd as New OleDbCommand() objCmd.Connection=objConnection objCmd.CommandText="[Query3]" objCmd.CommandType = CommandType.StoredProcedure
dim myDataAdapter as New OleDbDataAdapter(objCmd)
dim DataSetOne as New DataSet() myDataAdapter.Fill(DataSetOne, "Books") return DataSetOne objConnection.Close() end function
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.
