VB Error, Expected: end of statement.

[whitelockben]

Private Sub txtCN_Click()
Dim sPrefix As String
Dim Mysql As String
Dim sKey As String
Dim sSuffix As Integer
Dim X As Integer
Dim conn As New Adodb.Connections
Dim rs As New Adodb.Recordset

I get the error highlighted at Dim conn As New Adodb.Connections


The error I get is

Compile error:

User-defined type not defined

Can anyone help please?

 

[SteveH2508]

An SQL statement needs a semicolon terminator

Mysql = "SELECT Max(CDbl(Mid([YouFieldName]," & X & "))) AS NewNum"
FROM tbl_YourTblName Where YourFieldName Like '" & sPrefix & "*'" & ";"

 

[mdlueck]

Dim conn As New Adodb.Connections

I get the error highlighted at Dim conn As New Adodb.Connections

In my mind, that should be without the trailing 's'

'Attributes
Private adoConn As ADODB.Connection

 

[SteveH2508]

Oops, wrong thread - sorry! (Or has something been edited?)