DSolve[6*a*x*y[x]^2 + 3*a*y[x]^3 + Derivative[1][y][x] == 0,y[x],x]