Function Find_Nyt_Linienr() as integer Dim wLinienr as integer
strSQL = "SELECT MAX (Linienr) AS maxno FROM Ordre;" ObjConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.Mappath("GemDb.MDB") & ";") ObjComm = New OleDbCommand(strSQL, objConn)
ObjConn.Open() ObjRs = objComm.ExecuteReader()
Do While objRs.Read = true wLinienr = (objRs("maxno") + 1) Loop ObjConn.Close() objRs.Close()
return wLinienr End Function
Har dog siden fundet ud af at hvis jeg sletter hele denne "feature" så siger den stadig: Operation must use an updateable query.
Kan det være noget med rettigheder hos min host?? Eller skal jeg gøre noget specielt med filen før jeg loader den op.
Sorry. Havde overset den lille detalje. Tak igen ;o)
Synes godt om
Ny brugerNybegynder
Din løsning...
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.